大佬教程收集整理的这篇文章主要介绍了不知道如何把它变成 R 中的 for 循环,大佬教程大佬觉得挺不错的,现在分享给大家,也给大家做个参考。
我正在寻找一种更优雅的编码方式,包括 for 循环。我不想单独索引电子表格的每一列,因为最终我想要一个更大的“tsf”矩阵。
有人对如何做到这一点有任何想法吗?
编辑:重要的部分是如果treat = 0,那么该行应该= 0;如果treat = 1,那么该行应该有一个重复的0-5序列
I <- 50
T <- 10
treat <- round(runif(I,1))
tsf <- matrix(NA,I,T) #if treat = 0,then all rows should = 0; if treat = 1,then all rows should have a sequence of 0-5 that repeats until the end of the row
tsf[,1] <- ifelse(treat > 0,round(runif(I,5)))
tsf[,2] <- ifelse(tsf[,1]>0 & tsf[,1]<5,tsf[,1]+1,0)
tsf[,3] <- ifelse(tsf[,1]!=0 & tsf[,2]<5,2]+1,4] <- ifelse(tsf[,3]<5,3]+1,5] <- ifelse(tsf[,4]<5,4]+1,6] <- ifelse(tsf[,5]<5,5]+1,7] <- ifelse(tsf[,6]<5,6]+1,8] <- ifelse(tsf[,7]<5,7]+1,9] <- ifelse(tsf[,8]<5,8]+1,10] <- ifelse(tsf[,9]<5,9]+1,0)
我想你有一个错字,即 i
应该是 1
。下面可能是一个 for
循环选项
tsf[,1] <- ifelse(treat > 0,round(runif(I,5)))
for (k in 2:10) {
tsf[,k] <- ifelse(tsf[,1]>0 & tsf[,k-1]<5,tsf[,k-1]+1,0)
}
以上是大佬教程为你收集整理的不知道如何把它变成 R 中的 for 循环全部内容,希望文章能够帮你解决不知道如何把它变成 R 中的 for 循环所遇到的程序开发问题。
如果觉得大佬教程网站内容还不错,欢迎将大佬教程推荐给程序员好友。
本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。