wangleihong的个人博客分享 http://blog.sciencenet.cn/u/wangleihong

博文

按标题搜索
数据整理和拼图小例
2022-12-3 23:55
library(lubridate) library(tidyverse) ec2 - economics %% as_tibble() %% transmute(year=year(date),month=month(date),rate=uempmed) %% filter(year2005) %% spread(year,rate) ec2 - gather(ec2,key=year,value = unemp, '2006':'2015 ...
1575 次阅读|没有评论
ggplot2的函数式编程
2022-11-30 12:17
把所要绘制的几何图形代码,封装入一个列表中,再用隐式函数表达,比较简洁。 library(ggplot2) #把三种几何图形放入一个列表中 geoms - list( geom_point(), geom_boxplot(aes(group=cut_width(displ,1))), list(geom_point(),geom_smooth())) p - ggplot(mpg,aes(displ,hwy)) lapply(geo ...
1037 次阅读|没有评论
LearnBayes计算后验,用ggplot2包绘图。
2022-5-8 22:45
一般认为大学生的睡眠不会超过8小时,概率值p低于0.5,为了进一步研究,随机抽取了27名大学生,其中11名大学生睡眠超过了8小时,利用这个先验信息和观测数据,对这个深睡眠比率p进行估计。 install.packages(LearnBayes) library(LearnBayes) p - seq(0.05,0.95,by=0.1) # 概率网格 prior - c(1,5.2,8, ...
2394 次阅读|没有评论
ggplot2,3.3.5 绘图主题与以前的2.2.* 版本有很大的区别
2022-5-4 18:49
library(ggplot2) #2.2.*版以前的解说 # theme_grey(),线灰色的背景+白色的网格线 #theme_bw(), 白色背景+细灰色网格线 # theme_linedraw(), 白色背景+黑色的网格线,线有不同的宽度 # theme_light(),灰似linedraw 但有浅灰色的线条和坐标轴 # theme_dark(),与上一个很像,但是背景是暗色风格 # theme_minimal(), 简约风 ...
2702 次阅读|1 个评论
科学调查与实验时,需要多少样本?
2022-4-29 11:30
关于调查与实验时需要多少样本,是一个比较复杂的问题。 如果严格按照传统的数理统计思想,在随机事件中找寻找规律,且规律发生概率较大,且实验条件能控制的调查与实验来说,找到最小样本,是适用的,而对于那些在随机事件中,某种规律发生概率较低,且实验条件并不能完全控制的,找到最小样本,可能并不适用。数理统计 ...
4135 次阅读|没有评论
R绘图,用layout()进行图形组合
2022-4-28 16:49
data(mtcars) df - mtcars attach(df) # 一般情况下,用par(mfrow(nrows,ncols)可以满足多个图的组合,但是并不能控制每个图的相对大小,所以需要用到函数layout() #距阵的意思是 第一个图在 , 这个位置,第二个图在 ,第三个图在 数字1,2,3代表了第一、第二、第三个图,所在索引代表了图所在的位置 layout(matrix( ...
1990 次阅读|没有评论
R绘图,定义自己的坐标轴
2022-4-28 08:27
x - c(1:10) y - x z - 10/x # 生成一个可以修改的当前图形参数列表 opar - par(no.readonly = TRUE) # 定义图的边界,下边距,左边距,上边距,右边距,单位是英分 par(mar=c(5,4,4,8)+0.1) # 绘制 点线图 plot(x,y,type=b,pch=21, col=red,yaxt=n ...
1831 次阅读|没有评论

Archiver|手机版|科学网 ( 京ICP备07017567号-12 )

GMT+8, 2024-4-25 23:49

Powered by ScienceNet.cn

Copyright © 2007- 中国科学报社

返回顶部