内容来源于 Stack Overflow,并遵循CC BY-SA 3.0许可协议进行翻译与使用
怎样才能像这个数字那样,用α透明的、无标度的直方图在R中散布图表呢?
看起来它不是用ggplot 2制作的。
有人知道使用的是什么命令吗?
library(ggplot2) library(gridExtra) set.seed(42) DF <- data.frame(x=rnorm(100,mean=c(1,5)),y=rlnorm(100,meanlog=c(8,6)),group=1:2) p1 <- ggplot(DF,aes(x=x,y=y,colour=factor(group))) + geom_point() + scale_x_continuous(expand=c(0.02,0)) + scale_y_continuous(expand=c(0.02,0)) + theme_bw() + theme(legend.position="none",plot.margin=unit(c(0,0,0,0),"points")) theme0 <- function(...) theme( legend.position = "none", panel.background = element_blank(), panel.grid.major = element_blank(), panel.grid.minor = element_blank(), panel.margin = unit(0,"null"), axis.ticks = element_blank(), axis.text.x = element_blank(), axis.text.y = element_blank(), axis.title.x = element_blank(), axis.title.y = element_blank(), axis.ticks.length = unit(0,"null"), axis.ticks.margin = unit(0,"null"), panel.border=element_rect(color=NA),...) p2 <- ggplot(DF,aes(x=x,colour=factor(group),fill=factor(group))) + geom_density(alpha=0.5) + scale_x_continuous(breaks=NULL,expand=c(0.02,0)) + scale_y_continuous(breaks=NULL,expand=c(0.02,0)) + theme_bw() + theme0(plot.margin = unit(c(1,0,0,2.2),"lines")) p3 <- ggplot(DF,aes(x=y,colour=factor(group),fill=factor(group))) + geom_density(alpha=0.5) + coord_flip() + scale_x_continuous(labels = NULL,breaks=NULL,expand=c(0.02,0)) + scale_y_continuous(labels = NULL,breaks=NULL,expand=c(0.02,0)) + theme_bw() + theme0(plot.margin = unit(c(0,1,1.2,0),"lines")) grid.arrange(arrangeGrob(p2,ncol=2,widths=c(3,1)), arrangeGrob(p1,p3,ncol=2,widths=c(3,1)), heights=c(1,3))
p2 <- ggplot(DF,aes(x=x,colour=factor(group),fill=factor(group))) + geom_density(alpha=0.5) + scale_x_continuous(breaks=NULL,expand=c(0.02,0)) + scale_y_continuous(breaks=NULL,expand=c(0.00,0)) + theme_bw() + theme0(plot.margin = unit(c(1,0,-0.48,2.2),"lines")) p3 <- ggplot(DF,aes(x=y,colour=factor(group),fill=factor(group))) + geom_density(alpha=0.5) + coord_flip() + scale_x_continuous(labels = NULL,breaks=NULL,expand=c(0.02,0)) + scale_y_continuous(labels = NULL,breaks=NULL,expand=c(0.00,0)) + theme_bw() + theme0(plot.margin = unit(c(0,1,1.2,-0.48),"lines"))
目前呼叫中心只有API文档,需要用户自己开发。如果用户需要saas系统的呼叫中心可以使用智能外呼机器人:https://cloud.tencent.com/product/ccsr
你有没有调整观众端表现,即通过对 LivePushConfig 中的homeOrientation设置项进行配置,它控制的是观众端看到的视频宽高比是16:9还是6:19,调整后的结果可以用播放器查看以确认是否符合预期。
控制台使用的是新的接口,批量创建子网,https://cloud.tencent.com/document/product/215/31960,可以指定路由表。terraform开发的时候是基于api2.0开发的,还没有这个接口,因此暂时无法使用