저장소

#연습4head(mtcars)lm=lapply(mtcars,sum)unlist(lm)sapply(mtcars,sum) #연습5a=tapply(mtcars$hp, mtcars$vs==0, mean)a[1]-a[2] unlist(split(mtcars,mtcars$gear==3))unlist(split(mtcars,mtcars$gear==4))unlist(split(mtcars,mtcars$gear==5)) tapply(mtcars$hp,mtcars$gear,mean) ###행과 열 병합 ##행병합 rbindx=c(1,2,3,4,5)y=c(10,20,30,40,50)a=data.frame(x,y);arbind(a,c(6,60))rbind(a,c(7,'setosa')) i=head(iris)rbind(i,c(..