Whuer-deng-优快云博客

原创 ggplot2一页多图（组合图）

suppressMessages(library(dplyr))suppressMessages(library(ggplot2))#绘制第一幅图p1p1 <- diamonds %>% ggplot(aes(x = color, y = price, fill = color)) + geom_violin() + facet_grid(clarity ~ ....

2019-07-16 22:57:25 23202 8

原创在Windows10中安装Ubuntu并配置rstudio-server

一、在Windows中配置Ubuntu1、打开控制面板，点击“程序”2、点击“启动或关闭Windows功能 ”3、勾选“适用于Linux的Windows子系统”，确定并重启电脑4、打开Windows10的App Store，在搜索框输入“wsl”，在搜索结果选择“Ubuntu“或者“Ubuntu 18.04 LTS”，下载安装。5、安装成功之后启动，会显示在安装，等待安装成...

2019-07-16 22:56:44 2415

原创 R语言-两种方法绘制百分比图

library(ggplot2) #加载ggplot2包library(dplyr) #加载dplyr包library(ggstatsplot) #加载ggstatsplot包diamonds2 <- filter(diamonds, color %in% c('J', 'H')) #选取diamonds数据集中color为J和H的数据，保存为diamonds2#使用ggplo...

2019-07-16 22:55:49 17438 7

原创用ggplot2进行直线回归并添加回归方程和方差分析表

library(ggplot2) #加载ggplot2包library(dplyr) #加载dplyr包library(ggpmisc) #加载ggpmisc包mpg %>% ggplot(aes(x = displ, y = hwy)) + geom_point(aes(color = drv)) + #以drv为分组设置点的颜色 geom_smooth(meth...

2019-07-16 22:54:59 16769 9

原创 R语言——动态图

library(ggplot2)library(dplyr)library(gganimate)library(ggrepel)ADHD %>% ggplot(aes(x = Year, y = Value)) + geom_point(aes(color = Location)) + guides(size = F) + scale_x_c...

2019-07-16 22:53:59 5464 6

原创 shiny第一次实战

shiny第一次实战效果图library(shiny)library(ggplot2)library(ggpubr)ui <- fluidPage( sidebarLayout( sidebarPanel( titlePanel(h5('Please select your variables')), selectInput(inputId = '...

2019-07-16 22:53:07 358

原创 R语言——ggplot2 + ggpubr包添加显著性

#加载包library(ggplot2)library(ggpubr)p <- iris %>% ggplot(aes(Species, Sepal.Length)) + geom_violin(aes(fill = Species),trim = F) + stat_boxplot(geom = 'errorbar', width = 0.1) + g...

2019-07-16 22:52:31 8012

原创 shiny——聚类分析

kmeans聚类library(shiny)library(ggplot2)ui <- fluidPage( sidebarLayout( sidebarPanel( selectInput( inputId = 'X', label = 'Please select X variable', choices =...

2019-07-16 22:51:40 516

原创 R语言gganimate动态图

library(gapminder)library(dplyr)library(gganimate)gapminder %>% ggplot(aes(x = gdpPercap, y = lifeExp, size = pop, color = continent)) + geom_point() + scale_x_log10() + transition_m...

2019-07-16 22:49:25 5944 3

原创 R语言-ggplot自定义点的形状、线条的类型

library(ggplot2)library(ggpubr)show_point_shapes() #显示点的形状(ggpubr包内的函数）p1 <- ggplot(mpg, aes(x = displ, y = hwy, color = drv, shape = drv)) + geom_point() + theme_bw() #绘制基本图形，不自定义点的形状...

2019-07-16 22:46:34 76782

weixin_42933967的博客