自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(3)
  • 收藏
  • 关注

原创 散点图基础2

散点图基础2 library(ggplot2) library(gcookbook) sp<-ggplot(heightweight,aes(x=ageYear,y=heightIn)) #线性拟合lm sp+geom_point()+stat_smooth(method=lm) #默认95置信区间 sp+geom_point()+stat_smooth(method=lm,level = 0.99)#level设置置信区间 sp+geom_point()+stat_smooth(method=l

2020-10-01 16:21:57 382

原创 1.data.fram(), 2.head(),tail(),str() 3.names(),colnames() 4.访问数据框[],$,subset() 5.新增列,删除列$

1.data.fram(), 2.head(),tail(),str() 3.names(),colnames() 4.访问数据框[],,subset()5.新增列,删除列,subset() 5.新增列,删除列,subset()5.新增列,删除列 #1.数据框的创建 data.frame() > company <- c("A", "A", "B","C","D","C") > cash_flow <- c(100, 200, 300,800,500,1000) > year

2020-10-01 13:44:48 378

原创 散点图基础1

library(ggplot2) library(scales) setwd("D:\\zydata\\myRcode\\practice") data<-as.data.frame(read.csv(file="散点图练习数据.csv",header = TRUE,sep = ",")) data$ID<-as.factor(data$ID) data$DRUG<-as.factor(data$DRUG) #赋值时要data$DRUG或者新变量a

2020-09-30 21:35:07 286

空空如也

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除