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ǔ)言繪制ROC曲線的實(shí)例講解，具有很好的參考價(jià)值，希望對(duì)大家有所幫助。一起跟隨小編過(guò)來(lái)看看吧2021-04-04
關(guān)于R語(yǔ)言包的升級(jí)與降級(jí)問(wèn)題
這篇文章主要介紹了R語(yǔ)言包的升級(jí)與降級(jí)問(wèn)題，本文給大家介紹的非常詳細(xì)，對(duì)大家的學(xué)習(xí)或工作具有一定的參考借鑒價(jià)值,需要的朋友可以參考下2022-08-08
R語(yǔ)言及其IDE(RStudio）下載安裝詳細(xì)流程
這篇文章主要介紹了R語(yǔ)言及其IDE(RStudio）下載安裝詳細(xì)流程,本文給大家介紹的非常詳細(xì)，對(duì)大家的學(xué)習(xí)或工作具有一定的參考借鑒價(jià)值，需要的朋友可以參考下2021-03-03
R語(yǔ)言中corrplot標(biāo)題居中及eps格式輸出
由于論文的需要，很多R語(yǔ)言繪圖需要eps格式矢量圖的方式進(jìn)行輸出，同時(shí)最近也需要繪制相關(guān)性圖，因此決定寫個(gè)博客作為記錄，有需要的朋友可以借鑒參考下2021-11-11
這篇文章主要介紹了R語(yǔ)言的下載安裝圖文教程講解,本文給大家介紹的非常詳細(xì)，對(duì)大家的學(xué)習(xí)或工作具有一定的參考借鑒價(jià)值，需要的朋友可以參考下2021-03-03
這篇文章主要介紹了改變R語(yǔ)言默認(rèn)存儲(chǔ)包的路徑操作，具有很好的參考價(jià)值，希望對(duì)大家有所幫助。一起跟隨小編過(guò)來(lái)看看吧2021-03-03
R語(yǔ)言學(xué)習(xí)筆記之lm函數(shù)詳解
這篇文章主要介紹了R語(yǔ)言學(xué)習(xí)筆記之lm函數(shù)詳解,本文給大家介紹的非常詳細(xì)，對(duì)大家的學(xué)習(xí)或工作具有一定的參考借鑒價(jià)值，需要的朋友可以參考下2021-03-03
R語(yǔ)言ggplot2圖例標(biāo)簽、標(biāo)題、順序修改和刪除操作實(shí)例
R語(yǔ)言中畫圖時(shí)我們常常要設(shè)定標(biāo)題,如果圖片標(biāo)題是固定則很容易操作,下面這篇文章主要給大家介紹了關(guān)于R語(yǔ)言ggplot2圖例標(biāo)簽、標(biāo)題、順序修改和刪除操作的相關(guān)資料,需要的朋友可以參考下2022-07-07
在本篇內(nèi)容里小編給大家整理的是一篇關(guān)于R語(yǔ)言二進(jìn)制文件操作實(shí)例內(nèi)容，有興趣的朋友們可以學(xué)習(xí)下。2021-05-05
R語(yǔ)言UpSet包實(shí)現(xiàn)集合可視化示例詳解
這篇文章主要為大家介紹了R語(yǔ)言UpSet包實(shí)現(xiàn)集合可視化示例詳解，有需要的朋友可以借鑒參考下，希望能夠有所幫助，祝大家多多進(jìn)步，早日升職加薪2022-06-06