打印错误-if（nrow（layer_data）==0）return（）中的错误：参数的长度为零

我正在运行一个R代码（不是我的），该代码用于读取目录并绘制图表：

library(ggplot2)

dat <- at <- read.table(file="User/alexanderzamani/Documents/results.txt", 
                        sep = "\t", header= TRUE)

#let's just look at a single mutation rate
r <- dat[which(dat$u==0.00010),]

#now let's plot it out
p <- ggplot(r, aes(x=S, y=k, group=pN))
p + geom_line(aes(color=pN), size=2, alpha=0.5) + geom_point() +
    xlab("Overlapping generations (proportion of offspring that survive)") + 
    ylab("substitution rate") + 
    scale_colour_gradient(name="Degree of\npopulationsize\nfluctuation")

我以前没有R方面的经验，任何帮助都将不胜感激

- 编辑

这里是我正在使用的上传的.txt文件的链接-

---

您正在对

dat

进行子集设置，以创建

r

，其中列

u

等于0.0001，当您执行以下操作时：

r <- dat[which(dat$u==0.0001),]

---

r您正在子集您的
dat
以创建
r
，其中列
u
等于0.0001，当您执行以下操作时：

r <- dat[which(dat$u==0.0001),]

r如果没有一个可复制的例子，真的不可能帮助你。谢谢你的评论joran，我希望我能举个例子。但我所知道的是，这个例子是一个以“pN”为一组绘制“k”上的值“S”的图。现在我只有一个空白输出。如果你不提供一个可复制的例子，我也帮不了你。祝你好运哦，好的，什么是可复制的例子，我是新来的抱歉。@AlexanderZamani你至少可以把你的数据R文件上传到dropbox上。没有可复制的例子真的不可能帮助你。谢谢你的评论joran，我希望我能举个例子。但我所知道的是，这个例子是一个以“pN”为一组绘制“k”上的值“S”的图。现在我只有一个空白输出。如果你不提供一个可复制的例子，我也帮不了你。祝你好运哦，好的，什么是一个可复制的例子，我是新来的对不起。@AlexanderZamani你至少可以把你的数据R文件上传到dropbox上。哦，天哪，非常感谢你！你说得很对！Alexander您应该选择user1317221_G的响应作为答案（将显示为绿色复选标记）哦，天哪，非常感谢！你说得很对！Alexander您应该选择user1317221_G的响应作为答案（将显示为绿色复选标记）