R語(yǔ)言可視化ggplot2繪制24小時(shí)動(dòng)態(tài)血糖圖
更新時(shí)間：2022年05月12日 10:34:19 作者：WTRD
這篇文章主要為大家介紹了R語(yǔ)言可視化使用ggplot2繪制24小時(shí)動(dòng)態(tài)血糖，有需要的朋友可以借鑒參考下，希望能夠有所幫助，祝大家多多進(jìn)步，早日升職加薪
數(shù)據(jù)格式
sample=read.csv("sample.csv",header = T,stringsAsFactors = F)head(sample)
創(chuàng)建等距時(shí)間序列的方法（分鐘）
time=strptime("00:00:00","%H:%M:%S")+300*0:287 #沒有填日期的時(shí)候，默認(rèn)日期為今天畫圖代碼
#time首先要轉(zhuǎn)換成 POSIXct 格式, 下面的breaks一樣，geom_datetime接受的只有POSIXct格式。
sample$time=as.POSIXct(sample$time)
#breaks都是自定義的，選取哪個(gè)時(shí)間點(diǎn)都可以
ggplot(sample,aes(x=time,y=Glucose,group=1))+geom_line()+scale_x_datetime(
limits = c(as.POSIXct("2020-03-24 00:00:00 CST"),as.POSIXct("2020-03-24 23:59:59 CST")),
breaks = c(as.POSIXct("2020-03-24 00:00:00 CST"),as.POSIXct("2020-03-24 04:00:00 CST"),as.POSIXct("2020-03-24 07:00:00 CST"),as.POSIXct("2020-03-24 12:00:00 CST"),as.POSIXct("2020-03-24 18:00:00 CST"),as.POSIXct("2020-03-24 22:00:00 CST")),
labels = c("00:00","04:00","07:00","12:00","18:00","22:00")
)+scale_y_continuous(
breaks = c(6.0,6.1,6.5,7.0,7.5,8.0,8.5),labels = c("6.0","6.1","6.5","7.0","7.5","8.0","8.5")
)+theme_bw() +
theme(axis.text = element_text(size=16),axis.title = element_text(size=24)) #軸標(biāo)簽的大小
+ geom_hline(yintercept = c(6.1)) #添加一水平線，6.1是正常血糖高值
以上就是R語(yǔ)言可視化ggplot2繪制24小時(shí)動(dòng)態(tài)血糖的詳細(xì)內(nèi)容，更多關(guān)于ggplot2繪制動(dòng)態(tài)血糖的資料請(qǐng)關(guān)注腳本之家其它相關(guān)文章！
相關(guān)文章
R語(yǔ)言學(xué)習(xí)之字符串和時(shí)間格式化詳解
這篇文章主要為大家詳細(xì)介紹了R語(yǔ)言中字符串和時(shí)間格式化的相關(guān)知識(shí)，文中的示例代碼講解詳細(xì)，感興趣的小伙伴可以跟隨小編一起學(xué)習(xí)一下2023-03-03
R語(yǔ)言差異檢驗(yàn):非參數(shù)檢驗(yàn)操作
這篇文章主要介紹了R語(yǔ)言差異檢驗(yàn):非參數(shù)檢驗(yàn)操作，具有很好的參考價(jià)值，希望對(duì)大家有所幫助。一起跟隨小編過(guò)來(lái)看看吧2021-04-04
這篇文章主要為大家介紹了R語(yǔ)言常用兩種并行方法之snowfall詳解，有需要的朋友可以借鑒參考下，希望能夠有所幫助，祝大家多多進(jìn)步，早日升職加薪2021-11-11
R語(yǔ)言關(guān)于變量的知識(shí)點(diǎn)總結(jié)
在本篇文章里小編給大家整理了一篇關(guān)于R語(yǔ)言關(guān)于變量的知識(shí)點(diǎn)總結(jié)內(nèi)容，有興趣的朋友們可以學(xué)習(xí)下。2021-03-03
R語(yǔ)言-使用ifelse進(jìn)行數(shù)據(jù)分組
這篇文章主要介紹了R語(yǔ)言-使用ifelse進(jìn)行數(shù)據(jù)分組，具有很好的參考價(jià)值，希望對(duì)大家有所幫助。一起跟隨小編過(guò)來(lái)看看吧2021-04-04
這篇文章主要介紹了改變R語(yǔ)言默認(rèn)存儲(chǔ)包的路徑操作，具有很好的參考價(jià)值，希望對(duì)大家有所幫助。一起跟隨小編過(guò)來(lái)看看吧2021-03-03
這篇文章主要介紹了R語(yǔ)言向量下標(biāo)操作，具有很好的參考價(jià)值，希望對(duì)大家有所幫助。一起跟隨小編過(guò)來(lái)看看吧2021-04-04
這篇文章主要介紹了R語(yǔ)言判斷語(yǔ)句的使用詳解，幫助大家更好的理解和學(xué)習(xí)使用R語(yǔ)言，感興趣的朋友可以了解下2021-03-03
對(duì)于大數(shù)據(jù),linux和python是很好的處理工具,但是對(duì)于這兩個(gè)語(yǔ)言不熟悉的盆友來(lái)說(shuō),R語(yǔ)言是非常好的替代工具,下面這篇文章主要給大家介紹了關(guān)于R語(yǔ)言列篩選的法select的相關(guān)資料,需要的朋友可以參考下2022-07-07
R語(yǔ)言RCode與RStudio使用對(duì)比體驗(yàn)分析總結(jié)
這篇文章主要為大家介紹了R語(yǔ)言RCode與RStudio使用對(duì)比體驗(yàn)分析總結(jié)，有需要的朋友可以借鑒參考下，希望能夠有所幫助祝大家多多進(jìn)步2021-11-11