Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/70.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 如何仅按循环打印每列中的每个值_R - Fatal编程技术网

R 如何仅按循环打印每列中的每个值

R 如何仅按循环打印每列中的每个值,r,R,下面是我的代码: my.dataset1<- data.frame(site=c(11,12,13,14), season=c(21,22,23,24), PH=c(1,2,3,4)) for i in names(my.dataset1){ for (j in nrow(my.dataset1)) { print(my.dataset1$i[j]) } }

下面是我的代码:

my.dataset1<- data.frame(site=c(11,12,13,14),
                     season=c(21,22,23,24),
                     PH=c(1,2,3,4))


for i in names(my.dataset1){
  for (j in nrow(my.dataset1)) {
           print(my.dataset1$i[j])

       }
}
我真正得到的是

null

它不起作用。我只想通过for循环得到结果

必须修改循环语法<循环第一行中的code>名称也应替换为
ncol()
。这对你有用

my.dataset1<- data.frame(site=c(11,12,13,14),
                         season=c(21,22,23,24),
                         PH=c(1,2,3,4))


for (i in 1:ncol(my.dataset1)){
  for (j in 1:nrow(my.dataset1)) {
    print(my.dataset1[j,i])

  }
}

my.dataset1
for(j in names(mydataset)){for(i in 1:nrow(mydataset))print(mydataset[i,j])}
@Onyanbu将
names()
替换为
length()
移动问题
names()
可以使用,但是如果您需要
1:length()
而不仅仅是
length()
。此外,您不能将
$
用于变量,只需按照Onyanbu的建议使用
mydataset[j,i]
。获得类似结果的更简单方法是
unname(未列出(mydataset))
,这将在一个向量中打印它们,而不是一次打印一个。
my.dataset1<- data.frame(site=c(11,12,13,14),
                         season=c(21,22,23,24),
                         PH=c(1,2,3,4))


for (i in 1:ncol(my.dataset1)){
  for (j in 1:nrow(my.dataset1)) {
    print(my.dataset1[j,i])

  }
}