[问题类型]:
程式咨询(我想用R 做某件事情，但是我不知道要怎么用R 写出来)
[软件熟悉度]:
新手
[问题叙述]:
假设资料是T,A<-table(T),b<-cumsum(A)/sum(A),希望把A用来分类的factor取出来,
当成一个向量a,把a和b组成2*10的矩阵,因为后续计算会用的到,求高手指教
[程式范例]:
例如:T<-c(1:10)
希望达成
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
[1,] 1 2 3 4 5 6 7 8 9 10
[2,] 0.1 0.2 0.3 0.4 0.5 0.6 0.7 0.8 0.9 1.0
以上的效果
[环境叙述]:
win 7/R3.3.1
[关键字]:
table(),cumsum(),sum()

你是指 T <- 1:10; dimnames(table(T))$T 吗?

rbind(as.double(names(A)),a)

prop.table(table(T))x=c(1:10)cumsum( prop.table( table(x) ) )

回andrew43大,您的方法取出来后,无法和其他向量作运算回koai大,你的方法,我有成功!!!回f496328mm大,我您的方法,作完后好像还table的型式不是矩阵的型式,谢谢版上高手指教,我学很到很多,感谢附上小弟后来的作法以及跑出来的结果f<-as.double(names(table(T[,6])))e<-data.frame(cumsum(table(T[,6]))/sum(table(T[,6]))D<-rbind(f,e[,1])处理的data,以及跑的过程 http://codepad.org/Ju9SFS2Lrbind的结果好像怪怪的,列的部分为何不是显示"[1] [2]"而是显示"f "有人有更好的作法吗?谢谢

不顺眼的话 rownames(D) <- NULL 洗掉即可那是rbind()附带的效果

你最后做完D 再加上matrix(D,ncol=ncol(D))f应该就没了

赞赞赞~ok了