Re: [問題] 如何使用內插法補齊資料

看板R_Language作者andrew43 (討厭有好心推文後刪文者)時間3年前 (2021/10/18 11:38)推噓1(1推 0噓 0→)

留言1則, 1人參與討論串2/2 (看更多)

內建有 approx() 做線性內插。你的資料也要預先做一點datetime處理，一併先寫給你參考。正好 approx() 可以接受 x 為時間格式，所以很容易。 library(dplyr) library(readxl) d <- read_xlsx("testdata.xlsx") %>% mutate(Sensor1_time_POSIXct = as.POSIXct(Sensor1_time, format = "%Y%m%d %H:%M")) %>% mutate(Sensor2_time_POSIXct = as.POSIXct(Sensor2_time, format = "%Y%m%dT%H:%M")) %>% mutate( Sensor1_value_interpolated = approx(Sensor1_time_POSIXct, Sensor1_value, Sensor2_time_POSIXct)$y ) 另可以參考我的舊文有圖可以看不同的內插法的結果。 http://apansharing.blogspot.com/2012/12/ one-dimensional-interpolation-with-r.html ( https://bit.ly/3lO8jjy ) ※ 引述《studioA (understand?)》之銘言： : [問題類型]: : 程式諮詢(我想用R 做某件事情，但是我不知道要怎麼用R 寫出來) : : [軟體熟悉度]: : 入門(寫過其他程式，只是對語法不熟悉) : [問題敘述]: : 我有兩組濕度感測器的資料 : 兩個感測器 : 感測器1(Sensor1) 每5~7分鐘產生一筆資料 : 感測器2(Sensor1) 固定5分鐘產生一筆資料 : 我現在預計用內插法以感測器2時間為基準(就是每5分鐘一筆) : 把感測器1時間調整成固定5分鐘換算相對應時間點的濕度 : 但我發現我不會寫這個邏輯上網查套件也查不到合適套件 : 所以只能上來求助各位是否已有的內差法套件可以介紹 : 或是提點我這個邏輯如何寫法 : 以下是我預計要處理的一小部分資料請各位幫幫忙 : ppt.cc/fC80Cx -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 60.248.222.1 (臺灣) ※ 文章網址: https://www.ptt.cc/bbs/R_Language/M.1634528310.A.423.html