据说这个图可以用R做出来，大家知道是啥命令不？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

求教，这个图片应该咋做呢？用什么命令？
回帖有奖励，给出解决方案的自费奖励500论坛币。


----------------------------------帮别人问的，已经解决了，谢谢。

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏6 回帖

关键词：500论坛币 0论坛币 解决方案 论坛币

这个图是通过ggplot2包作出来的。
具体是什么类型的图，我也不太清楚。
看样子，应该是一本书里的内容，你可以结合书名，看一下是否有对应的代码？

more data descriptions are needed. what is r here? is it a correlation coef? what is p?

彩图比较少见啊

不用据说，看这风格有99%的信心是用ggplot2及其衍生package做出来的，geom_jitter()应该少不了

模拟生成数据，试了试，抛砖引玉：

1. df <- tibble(A = rnorm(500, 0, 3),
   
2.              B = rnorm(500, 4, 4))
   
3. df %>%
   
4.   gather() %>%
   
5.   ggplot(aes(key, value, color = key)) +
   
6.   geom_jitter(width = 0.2,
   
7.               height = 0.2,
   
8.               alpha = 0.5) +
   
9.   geom_point(alpha = 0.5) +
   
10.   stat_summary(
    
11.     fun.y = mean,
    
12.     color = "red3",
    
13.     geom = "point",
    
14.     size = 4
    
15.   ) +
    
16.   geom_segment(aes(
    
17.     x = 1,
    
18.     y = mean(df$A),
    
19.     xend = 2,
    
20.     yend = mean(df$B)
    
21.   ),
    
22.   color = "dodgerblue",
    
23.   size = 1)

复制代码

narcissism0923 发表于 2019-5-17 22:50
模拟生成数据，试了试，抛砖引玉：

因为蓝色线段具体是什么不得而知，所以这里暂用分组均值代替试试。