所用R包: forestplot , forestploter 单列森林图 示例数据 #forestplot包森林图代码附注释 fig3_1<-forestplot(result1[,c(1,2,6,7)], mean=result1[,3], lower=result1[,4], upper=result1[…
所用R包: ggplot2 1.数据准备 # 定义一个函数，用于生成每个变量的绘图所用数据 generate_test_data <- function(variable) { # 统计每列中大于 1、2、3。。。。的个数 count_values <- function(column) { c( sum(column < 0, …
所用R包: tidyverse 1.所需数据计算 #数据转置 adam1 <- adam %>% pivot_longer(variables,names_to="Time",values_to="ADL") #计算ADL的标准误 tgc1 <- summarySE(adam1, measurevar="ADL", groupva…