R_Language 板


LINE

※ 引述《kindarex (花香滿庭園)》之銘言: : 程式諮詢(我想用R 做某件事情,但是我不知道要怎麼用R 寫出來) : [軟體熟悉度]: : 新手(沒寫過程式,R 是我的第一次) : [問題敘述]: : 各位高手大家好,謝謝上次高手說先了解時間序列分析 : 也開始在自學練習畫圖,但遇到同一個問題卡很久 : 我的資料是新竹2010-2014年1-12月的平均溫度, : 從Excel表整理好後匯入到Rstudio,開始按照youtube的影片教學 : 練習跟跟影片教學中https://www.youtube.com/watch?v=0gf5iLTbiQM
: 2小時07分開始進行練習 : 以下是我的資料 : > d<-read.csv("C:\\Users\\1503063\\Desktop\\平均溫度.csv") : > d : Year Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec : 2010 15.9 16.7 19 20.3 25 26.5 29.9 29.6 28.1 24.3 20.9 16.4 : 2011 13.3 15.2 15.5 21 24.3 28.5 28.8 29.2 27.7 24.5 22.7 16.6 : 2012 15.3 14.9 17.4 23.3 25.8 27.8 29.7 28.6 26.8 23.9 21 17.3 : 2013 5.8 17.3 19.2 20.9 26 28.9 28.9 28.9 27.7 24.2 21 16.1 : 2014 15.6 15.4 18 22.3 25.3 28.3 30.4 29.9 29.6 24.7 22 16 : > myts <- ts(d, start=c(2010,1), end=c(2014,12), frequency=12) : > class(myts) (以下吃掉) 大概看了一下影片 你跟講者不同的地方在於你的原始資料設定 雖然你的資料結構跟講者一樣(看起來 但是class卻不同 我猜你是在excel就先把matrix的行列名稱設好 但是如果你注意看影片 會發現講者是讀進numeric的資料 print出來的matrix是經過ts()轉換之後(cola2) 你如果用str(cola2)去看 會發現他的結構長這樣 Time-Series [1:100] from XXXX to XXXX: ... class(cola2) # [1] "ts" 但你的class(d)應該是"matrix" 所以我建議可以這樣做 d <- matrix(runif(36), nrow = 3, ncol = 12) dd <- seq(as.Date("2000/1/1"), by = "month", length.out = 12) dd <- format(dd, "%b") colnames(d) <- dd rownames(d) <- c("2000", "2001", "2002") # your imported data d Jan Feb Mar Apr May Jun Jul Aug Sep 2000 0.06464222 0.4859936 0.19107794 0.06705835 0.9428377 0.1095469 0.5137503 0.50677142 0.64370554 2001 0.27664552 0.1420115 0.08748821 0.23434808 0.6796937 0.8334102 0.3728003 0.30359776 0.18653139 2002 0.75141165 0.3336006 0.88925778 0.08978937 0.8929249 0.2680072 0.9846332 0.03387092 0.09410578 Oct Nov Dec 2000 0.4206437 0.05388721 0.5835108 2001 0.7170996 0.37223711 0.1542709 2002 0.2134047 0.52395925 0.5123901 # transform the matrix to be numeric vector md <- as.numeric(t(d)) class(md) # [1] "numeric" myts <- ts(md, start = c(2000, 1), end = c(2002, 12), frequency = 12) myts Jan Feb Mar Apr May Jun Jul Aug Sep 2000 0.06464222 0.4859936 0.19107794 0.06705835 0.9428377 0.1095469 0.5137503 0.50677142 0.64370554 2001 0.27664552 0.1420115 0.08748821 0.23434808 0.6796937 0.8334102 0.3728003 0.30359776 0.18653139 2002 0.75141165 0.3336006 0.88925778 0.08978937 0.8929249 0.2680072 0.9846332 0.03387092 0.09410578 Oct Nov Dec 2000 0.4206437 0.05388721 0.5835108 2001 0.7170996 0.37223711 0.1542709 2002 0.2134047 0.52395925 0.5123901 class(myts) # [1] "ts" plot(myts) --



※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 140.113.136.217
※ 文章網址: https://webptt.com/m.aspx?n=bbs/R_Language/M.1470661341.A.738.html ※ 編輯: naturalsmen (140.113.136.217), 08/08/2016 21:02:43
1F:→ naturalsmen: 補充:因為你的原始資料是matrix 所以ts() 08/08 21:17
2F:→ naturalsmen: 出來的資料是用來畫multivariate的class 08/08 21:18
3F:推 kindarex: 真的真的非常謝謝你!!!超級受用的,新手學到一招了!!版 08/11 00:10
4F:→ kindarex: 上好溫暖^^ 08/11 00:10







like.gif 您可能會有興趣的文章
icon.png[問題/行為] 貓晚上進房間會不會有憋尿問題
icon.pngRe: [閒聊] 選了錯誤的女孩成為魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一張
icon.png[心得] EMS高領長版毛衣.墨小樓MC1002
icon.png[分享] 丹龍隔熱紙GE55+33+22
icon.png[問題] 清洗洗衣機
icon.png[尋物] 窗台下的空間
icon.png[閒聊] 双極の女神1 木魔爵
icon.png[售車] 新竹 1997 march 1297cc 白色 四門
icon.png[討論] 能從照片感受到攝影者心情嗎
icon.png[狂賀] 賀賀賀賀 賀!島村卯月!總選舉NO.1
icon.png[難過] 羨慕白皮膚的女生
icon.png閱讀文章
icon.png[黑特]
icon.png[問題] SBK S1安裝於安全帽位置
icon.png[分享] 舊woo100絕版開箱!!
icon.pngRe: [無言] 關於小包衛生紙
icon.png[開箱] E5-2683V3 RX480Strix 快睿C1 簡單測試
icon.png[心得] 蒼の海賊龍 地獄 執行者16PT
icon.png[售車] 1999年Virage iO 1.8EXi
icon.png[心得] 挑戰33 LV10 獅子座pt solo
icon.png[閒聊] 手把手教你不被桶之新手主購教學
icon.png[分享] Civic Type R 量產版官方照無預警流出
icon.png[售車] Golf 4 2.0 銀色 自排
icon.png[出售] Graco提籃汽座(有底座)2000元誠可議
icon.png[問題] 請問補牙材質掉了還能再補嗎?(台中半年內
icon.png[問題] 44th 單曲 生寫竟然都給重複的啊啊!
icon.png[心得] 華南紅卡/icash 核卡
icon.png[問題] 拔牙矯正這樣正常嗎
icon.png[贈送] 老莫高業 初業 102年版
icon.png[情報] 三大行動支付 本季掀戰火
icon.png[寶寶] 博客來Amos水蠟筆5/1特價五折
icon.pngRe: [心得] 新鮮人一些面試分享
icon.png[心得] 蒼の海賊龍 地獄 麒麟25PT
icon.pngRe: [閒聊] (君の名は。雷慎入) 君名二創漫畫翻譯
icon.pngRe: [閒聊] OGN中場影片:失蹤人口局 (英文字幕)
icon.png[問題] 台灣大哥大4G訊號差
icon.png[出售] [全國]全新千尋侘草LED燈, 水草

請輸入看板名稱,例如:Gossiping站內搜尋

TOP