关于使用R进行分析,我是新蜜蜂。我非常感谢您支持解决以下问题
data <- read.csv ("Barcode.csv")
i <- 1
while (i < 41)
{
barcode <- c(data $b[i],data $c[i],data $d[i],data $e[i],data $f[i],
data $g[i],data $h[i],data $i[i],data $j[i],data $k[i],
data $l[i],data $m[i],data $n[i],data $o[i],data $p[i],
data $q[i],data $r[i],data $s[i],data $t[i],data $u[i],
data $v[i],data $w[i],data $x[i],data $y[i],data $z[i],
data $Aa[i],data $Ab[i])
"work"[i] <-barcode
i < - i+1
}
j < - 1
while (i < 100)
{
barcode <- c(data $b[i],data $c[i],data $d[i],data $e[i],data $f[i],
data $g[i],data $h[i],data $i[i],data $j[i],data $k[i],
data $l[i],data $m[i],data $n[i],data $o[i],data $p[i],
data $q[i],data $r[i],data $s[i],data $t[i],data $u[i],
data $v[i],data $w[i],data $x[i],data $y[i],data $z[i],
data $Aa[i],data $Ab[i])
work [41] <-barcode
z <- pairwise.t.test (work,paired = TRUE)
dspres [j] <- z
i <- i+1
j <- j+1
}
运行此程序会在
答案 0 :(得分:2)
“work”是一个文字字符向量,您无法分配给它的子集。这不过是
"work"[1] <- 1
尝试删除双引号。我忽略了你的其余代码,因为错误消息指的是这里特定问题的确切位置。