GGplot - R - 颜色/组的第二个轴 - 长格式

大佬教程收集整理的这篇文章主要介绍了GGplot - R - 颜色/组的第二个轴 - 长格式，大佬教程大佬觉得挺不错的，现在分享给大家，也给大家做个参考。

如何解决GGplot - R - 颜色/组的第二个轴 - 长格式？

不幸的是，我在 GGPlot 和辅助轴上苦苦挣扎。 我创建了一个长格式的数据，其中包含我想在 GGplot 中显示的三个类别。 1 应显示为多图， 1是颜色 1 是线型。就像图表中的这里！

我现在遇到的问题是，例如，我不知道如何为“虚线”集成辅助轴。替代方案我可以只翻转数据并包含颜色的第二个轴，但我认为这是完全相同的问题。 提前致谢！

这是我目前的代码。

#test 
cat1 <- c(rep("A",10),rep("B",rep("A",10))
cat2 <- c(rep("A",10))
steps <- c(seq(1,seq(1,10))
sz <- c(rep(1,40),rep(2,40))
data <- c(cumsum(exp(rnorm(10))),(rnorm(10))/100,cumsum(exp(rnorm(10))),(rnorm(10))/100)

df <- data.frame("category1" = cat1,"category2" =cat2,"Steps" = steps,"SZenario" = sz,"Value" = data)


ggplot(df,aes(x=Steps,y=Value,group=interaction(category1,category2),color=category2,linetype=category1))+
  geom_line()+
  faCET_wrap(faCETs=vars(SZenario),scales="free")

解决方法

df1 <- df %>% 
  mutate(Value = ifelse(Category1=="B",Value*100,value))
ggplot(df1,aes(x=Steps,y=Value,group=interaction(Category1,Category2),color=Category2,linetype=Category1))+
  geom_line()+
  faCET_wrap(faCETs=vars(Szenario),scales="free") +
  scale_y_conTinuous("Category1",sec.axis = sec_axis(trans = ~ . * (min(df$value)/max(df$value)),name = 'Category2'))

ggplot(df,linetype=Category1))+
  geom_line()+
  faCET_wrap(~Szenario,scales = "free_y") +
  scale_y_conTinuous("Category1",sec.axis = sec_axis(trans = ~ . * (min(df$value) / max(df$value)),name = 'Category2'))

大佬总结

以上是大佬教程为你收集整理的GGplot - R - 颜色/组的第二个轴 - 长格式全部内容，希望文章能够帮你解决GGplot - R - 颜色/组的第二个轴 - 长格式所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错，欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ：384754419，请注明来意。