我有一些谨慎的数据，如下所示：
height <- c(1,2,3,4,5,6,7,8)
weight <- c(100,200,300,400,500,600,700,800)
person <- c("Jack","Jim","Jill","Tess","Jack","Jim","Jill","Tess")
set <- c(1,1,1,1,2,2,2,2)
dat <- data.frame(set,person,height,weight)
我正在尝试绘制具有相同x轴（人）和2个不同y轴（体重和身高）的图表。我发现所有示例都试图使用基准图绘制辅助轴（sec_axis）或谨慎的数据。有没有一种简单的方法可以将sec_axis用于ggplot2上的离散数据？编辑：评论中有人建议我尝试建议的答复。但是，我现在遇到这个错误
这是我当前的代码：
p1 <- ggplot(data = dat, aes(x = person, y = weight)) +
geom_point(color = "red") + facet_wrap(~set, scales="free")
p2 <- p1 + scale_y_continuous("height",sec_axis(~.*1.2, name="height"))
p2
I get the error: Error in x < range[1] :
comparison (3) is possible only for atomic and list types
或者，现在我修改了示例以匹配发布的示例。
p <- ggplot(dat, aes(x = person))
p <- p + geom_line(aes(y = height, …我有一个数据框(df),列出与每个站点关联的国家/地区
Site Country
Site1 USA
Site2 Vietnam
Site3 Spain
Site4 Germany
Site5 China
我想附上一个专栏,我将每个国家与其相应的大陆联系起来.我写了一个简单if loop的做法:
df$Continent <- NA
if(df$Country == "USA" |df$Country == "Canada" |df$Country == "Mexico")
{df$Continent <- "North America"}
if(df$Country == "Spain" |df$Country == "France" |df$Country == "Germany")
{df$Continent <- "Europe"}
## .. etc
summary(df)
但是,每当我运行df时,我发现它将北美分配给所有国家.我知道这可能听起来很微不足道,但是如果我if在任何地方使用法规而不是else或者它会有所不同if else吗？有任何纠正这个的建议吗？
我用R markdown编写了很长的绘图代码。我不想显示代码，但我想显示图形。
我使用了这个建议并将其放在我的R块中
```{r, include=FALSE, results="hide", fig.width=8, fig.height=6}
x = c(1:10)
y = c(40:50)
plot(x~y)
````
但是，这根本不会在编织文件上提供任何输出。有什么建议么？