- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
所以我一直在努力在这个情节上找到一个正确的传说。我的最终目标是显示线条颜色和点颜色的图例。我可以让图例中的线条正常工作,但想知道我也如何获得点(包括点的形状和颜色)?非常感谢任何解决方法或建议!
Tempx<-c(20, 22, 24, 26, 28, 30, 32, 34)
Tempx<-rep(Tempx,2)
Temp<-rnorm(1000,28,2)
var1<-rnorm(1000,25,5)
Data<-data.frame(Temp,var1)
Temp<-rnorm(1000,28,2)
var1<-rnorm(1000,12,5)
Data2<-data.frame(Temp,var1)
a1<-1.05*Tempx
a2<-0.5*Tempx
a1low<-0.95*Tempx
a1high<-1.15*Tempx
a2low<-0.4*Tempx
a2high<-0.6*Tempx
plot1<-ggplot(NULL, aes(Temp, var1)) +
geom_point(data = Data, colour="grey60", size=1.5, shape=1, show.legend=TRUE) +
geom_point(data = Data2, shape= 16, size=1, show.legend=TRUE) +
geom_line(aes(x=Tempx,y=a1, colour="grey50"), size=1.75, show.legend=TRUE) +
geom_line(aes(x=Tempx,y=a2, colour="black"), size=1.75, show.legend=TRUE) +
geom_line(aes(x=Tempx,y=a1low), colour="grey50",size=1.25, linetype="longdash") +
geom_line(aes(x=Tempx,y=a1high), colour="grey50",size=1.25, linetype="longdash") +
geom_line(aes(x=Tempx,y=a2low), colour="black",size=1.25, linetype="longdash") +
geom_line(aes(x=Tempx,y=a2high), colour="black",size=1.25, linetype="longdash") +
scale_shape_manual(values=c(1, 16)) +
scale_color_manual(labels = c("low", "high"), values=c('black','grey50')) +
theme_bw()+
theme(axis.line.x = element_line(colour = "black"),
axis.line.y = element_line(colour = "black"),
axis.text.x = element_text(margin=unit(c(0.4,0.4,0.4,0.4), "cm")),
axis.text.y = element_text(margin=unit(c(0.4,0.4,0.4,0.4), "cm")),
axis.title.x = element_text(margin = margin(t = -6)),
axis.title.y = element_text(margin = margin(t = -6)),
axis.text=element_text(size=13),
text = element_text(size=14),
plot.title = element_text(size=16, hjust=0),
axis.ticks.length = unit(-0.1,"cm"),
panel.grid.major = element_blank(),
panel.grid.minor = element_blank(),
panel.border = element_blank(),
panel.background = element_blank()) +
scale_x_continuous(name = "Temperature", breaks = c(20, 22, 24, 26, 28, 30, 32, 34), expand=c(0,0), limits=c(20,34))+
scale_y_continuous(name = "Variable 1", expand = c(0, 0), limits = c(0, 40)) +
ggtitle("Title")
plot1
最佳答案
您可以通过将数据从宽格式转换为长格式来大大缩短代码。那么你只需要调用一次 geom_point
和 geom_line
下面是一个例子。 dat1
和 dat2
分别包含点和主线。 dat1
已经是长格式。我们也将 dat2
转换为 dat2long
。我已将 dat3long
放在单独的数据框中,因为我们不需要将这些值映射到生成图例的美学。因此,我为这些行使用了对 geom_line
的单独调用,并对颜色进行了硬编码。
library(tidyverse)
# Create long data frame for point data
dat1 = bind_rows(list(a1=Data, a2=Data2), .id="Source")
# Create long data frames for lines data
dat2 = data.frame(Tempx, a1, a2)
dat3 = data.frame(Tempx, a1low, a1high, a2low, a2high)
dat2long = dat2 %>% gather(Source, value, -Tempx)
dat3long = dat3 %>% gather(Source, value, -Tempx)
ggplot() +
geom_point(data=dat1, aes(Temp, var1, shape=Source, colour=Source)) +
geom_line(data=dat2long, aes(x=Tempx, y=value, colour=Source)) +
geom_line(data=dat3long, aes(x=Tempx, y=value, group=Source), linetype=2,
colour=rep(c("red","blue"), each=2*length(Tempx))) +
scale_colour_manual(values=c("red","blue")) +
theme_bw()
如果您的目标是绘制置信区间,您可以这样做:
ggplot(data=dat1, aes(Temp, var1, shape=Source, fill=Source, colour=Source)) +
geom_point() +
geom_smooth(method='lm') +
theme_bw()
关于r - 难以获得在 ggplot2 中指定颜色和形状的混合线 a 和点图例,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/49015167/
我是 TensorFlow 菜鸟。我已经从 deeppose 的开源实现中训练了一个 TensorFlow 模型,现在必须针对一组新图像运行该模型。 该模型是在大小为 100 * 100 的图像上训练
我正在尝试以这种方式设置节点的大小: controller[shape=circle,width=.5,label="Controller",style=filled,fillcolor="#8EC1
是否有 VBA 代码可以在选择的每个单元格周围添加文本框。文本框应该是单元格的大小(类似于边框)? 最佳答案 您可以使用 .AddTextbox方法。循环遍历您选择的单元格,并使用单元格的尺寸属性来设
我有一个变量 a尺寸 (1, 5) 我想“平铺”的次数与我的小批量的大小一样多。例如,如果小批量大小为 32,那么我想构造一个张量 c维度为 (32, 5),其中每一行的值与原始 (1, 5) 变量
我在使用 javaFX 时遇到问题。我想每 1000 毫秒在应用程序窗口中显示一次时间。 public class Main extends Application { StackPane root
所以我目前正在创建这个 API。这个登录类应该只创建一个场景,其中包含制作 GUI 所需的所有框。我遇到的问题是,单击时我的形状不会执行任何操作。我有事件监听器,但它不起作用。 import
我正在用 python turtle 画一些东西,我使用了形状函数,但是形状 overdraw 了它们之前的其他形状(我可以看到形状在移动),并且我只得到了最后一个形状: `up() goto(-20
我正在读取多个 .csv 文件作为具有相同形状的 panda DataFrame。对于某些索引,某些值为零,因此我想选择具有相同形状的每个索引的值,并为相同的索引放置零值并删除零以成为相同的形状: a
我有一个简单的二维网格,格式为 myGrid[x,y] 我正在尝试找到一种方法来找到围绕选定网格的周长,这样我就有了一个可供选择的形状。 这是我的意思的一个例子: 这里的想法是找到所有相关的“角”,也
我有一个网络层,用于调用多个端点。我想减少重复代码的数量,并认为也许我可以将响应模型作为端点的一部分传递。 这个想法是不需要多个仅因响应而不同的函数,我可以调用我的网络层并根据路径进行设置。 我看到的
我正在创建一个自定义 ImageView,它将我的图像裁剪成六边形并添加边框。我想知道我的方法是否正确,或者我是否以错误的方式这样做。有很多自定义库已经在执行此操作,但开箱即用的库中没有一个具有我正在
我正在编写一些代码,这些代码需要识别一些基于节点云的相当基本的几何图形。我会对检测感兴趣: 板(简单有界平面) 圆柱体(两个节点循环) 半圆柱(圆弧+直线+圆弧+直线) 圆顶(n*loop+top n
我有这个形状: http://screencast.com/t/9UUhAXT5Wu 但边界在截止点处没有跟随它 - 我该如何解决? 这是我当前 View 的代码: self.view.backgro
我现在脑震荡,所以我想问一个非常简单的问题。 目前,我正在尝试打印出这样的开头 当输入为 7 时,输出为 * ** * ** * ** * 这里是我的代码,它打印 14 次而不是 7 次,或者当我输入
我想生成如下设计。计划选项卡顶部的"new"。我使用的属性适用于 chrome 和 mozilla,但在 Edge 中出现故障。 以下是我在 chrome 中应用的样式: a.subnav__item
我想要一个带有两种颜色边框轮廓的 shape 元素。我可以使用 solid 元素做一个单一的颜色轮廓,但这只允许我画一条线。我尝试在我的形状中使用两个 stroke 元素,但这也不起作用。 有没有办法
我需要为屏幕上的形状着色任何我想要的颜色。我目前正在尝试使用 UIImage 来执行此操作,我想根据自己的需要重新着色。据我所知,执行此操作的唯一方法是获取 UIImage 的各个像素,这需要更多我想
因此,经过多年的 OOP,我从我的一门大学类(class)中得到了一个非常简单的家庭作业,以实现一个简单的面向对象的结构。 要求的设计: 实现面向对象的解决方案以创建以下形状: 椭圆、圆形、正方形、矩
关闭。这个问题需要更多focused .它目前不接受答案。 想改进这个问题吗? 更新问题,使其只关注一个问题 editing this post . 关闭 5 年前。 Improve this qu
我想知道是否可以使用类似于以下的 div 制作复杂的形状: 它基本上是一个四 Angular 向内收缩的圆 Angular 正方形。目标是使用背景图像来填充它。我可以使用具有以下 SVG 路径的剪辑蒙
我是一名优秀的程序员,十分优秀!