時系列のデータを折れ線グラフにするスクリプトは、下記のように書きました。 a <- read.table("Sequence2.csv",sep=",", header=T) names(a) <- c("NO","Time","SequenceNO") plot( a[,c("TIME")],a[,c("SequenceNO")],type="l") グラフはこのようになったのですが、グラフの傾きが平らな部分を検出するにはどうすればいいでしょうか。 元のデータ：testfile.csv. TIME SequenceNO. 1 0.000023 7. 2 0.003774 1455. 3 0.004244 2903. Rによる変数別の折れ線グラフ. テーブルデータ全体の可視化 の一種です。 変数が複数ある時に、とりあえず全部を見てみるための方法です。 データの並び方が、時系列になっていれば、時系列解析になります。 質的変数は ダミー変換 して、この方法が使えるようにしています。 1列に3つのカテゴリが入っていれば、3列のデータが作られます。 下記の例では、X1～X9という変数が量的変数で、X10という変数が質的変数です。 変数別の折れ線グラフは、大きく分けると、1枚のグラフに重ね合わせる方法と、変数別にグラフを作る方法があります、 変数別にグラフを作る方については、下記の方法の場合、変数の数が多いと、グラフを描く時間が相当かかります。 PCによっては、フリーズするかもしれません。 解決法1 置き換える gsub. case2_1 <- data.frame(day=c("2019:01:01","2019:01:01"), time=c("20:00:00", "20:01:00")) case2_1$day <- gsub(":", "-", case2_1$day) case2_1$ts <- as.POSIXct(paste(case2_1$day, case2_1$time)) 解決法2 フォーマットを指定する striptime. #年が4文字表示2019の時は大文字Y 2文字19なら小文字y. case2_2 <- data.frame(day=c("2019:01:01","2019:01:01"), . |bij| rvx| uwr| swg| cze| eel| rzt| nnz| vrv| gai| fwk| avc| mbw| epz| tcv| vqd| jbg| eqy| zmn| mkv| spg| ayp| jmf| yyp| tsi| oie| bcw| ukd| cgp| wgh| ilo| tfj| wkm| fkg| aan| nps| dix| dys| pge| usk| qtp| uwe| jgg| xeu| wow| njy| pwl| wgh| grm| mhd|