r - plot.window(...) 中的错误：需要 R Markdown 中的有限“xlim”值

Question

这是我的 R 代码。我不太确定自己在做什么，但我不断收到此错误。我正在尝试在 RMarkdown 中编织它，但它不起作用，所以如果你能提供帮助，那就太好了！

read.table("jmen.txt")

jmen <- read.table("jmen.txt")

仿图

hair_table<-table(jmen$Hair)
barplot(hair_table, col=c("Black","cornsilk","Salmon4","Coral1"), main="Hair Color of Sampled JMen", xlab="Hair Colors", ylab="Number of Men", names.arg=c("Black","Blond(e)","Brown","Red"))

我的错误是 plot.window(...) 中的错误：需要有限的“xlim”值

从我读到的内容听起来我需要将我的限制从字符更改为数值或类似的东西？我不太确定。

这是我的 jmen.txt 文件的数据

姓名	年龄	眼睛	头发
约翰	32	蓝色的	棕色的
吉姆	39	绿色的	红色的
贾马尔	48	棕色的	金发
约翰	21	蓝色的	金发
胡里奥	50	绿色的	棕色的
朱利安	9	棕色的	棕色的
贾布里勒	83	蓝色的	黑色的
杰米	10	棕色的	红色的
约阿希姆	12	蓝色的	棕色的

姓名 年龄 眼睛 头发 John 32 Blue Brown Jim 39 Green Red Jamal 48 Brown Blond Johan 21 Blue Blond Julio 50 Green Brown Julian 9 Brown Brown Jabril 83 Blue Black Jamie 10 Brown Red Joachim 12 Blue Brown

标签： rr-markdown

Answer 1

你的问题从一开始就出现了。您忘记添加header参数。

中间输出不正确：

hair_table<-table(jmen$Hair)
< table of extent 0 >

现在，它可以按照您的意愿工作：

```{r, message=FALSE, warning=FALSE, echo=FALSE}

jmen <- read.table("jmen.txt", header=T)
hair_table <- table(jmen$Hair)

barplot(hair_table, 
        col=c("Black","cornsilk","Salmon4","Coral1"), 
        main="Hair Color of Sampled JMen", 
        xlab="Hair Colors", ylab="Number of Men",
        names.arg=c("Black","Blond(e)","Brown","Red"))
```

未来：在将一些代码添加到 RMarkdown 之前，在控制台中对其进行测试。

并且不要忘记格式化代码。祝你好运 ;）