명령어좀 가르켜줘... ㅜ

 

# 2.2) .x<- sample(0:100, 50000, replace=T)  //0에서 100 사이에50000개정수렌덤추출

#  y<- sample(0:100, 50000, replace=T)  //0에서 100 사이에50000개정수렌덤

# 추출하여 A,B,C,D에 해당되는 5001부터 50000개일 경우의 A,B,C,D의

# X,Y평균과 분산을 구하시오 ,  5000까지의 평균과 분산을 구한 후 5001, 5002,

#5003, ........, 50000인 경우를 for문을 단 한번만 사용하여 45000개의 평균과

#분산을구할 것 for (j in 5001:50000){45000개의 평균과 분산} (while과,

# repeat문도 사용한 코드도 제시 하시오:u(t+1)<-f(u(t)),var(t+1)<-g(u(t), var(t)..).)

 

이거랑

 

 

# 5.x1<- sample(0:100, 5000, replace=T), x2<- sample(0:100, 5000, replace=T),

#  x3<- sample(0:100, 5000, replace=T), x4<- sample(0:100, 5000, replace=T),

#  y1<- sample(0:100, 5000, replace=T), y2<- sample(0:100, 5000, replace=T),

#  y3<- sample(0:100, 5000, replace=T), y4<- sample(0:100, 5000, replace=T),

# xx<-data.frame(x1,x2,x3,x4)

# yy<-data.frame(y1,y2,y3,y4)

#xx 행의최대값이같는위치와yy의동일한행의최대값이같는위치가같은경우는

# 몇개인가 ? (예 max(xx[1000, ])=> xx[1000,2], max(yy[1000,])=>yy[1000,2])

# R Code를제시하시오