次のサンプルでは、サンプル データ (タイムスタンプとそれに関連付けられた値) を使用して data.frame を作成します。次に、ポリチャートをバックエンドとして rCharts を使用してこれらのデータをプロットしてみます。一度は元のタイム スタンプを使用し、もう 1 回は intiger に変換した後です。
dtf <- data.frame(timestamp=c("2013-02-01 00:02:16", "2013-02-01 00:02:21", "2013-02-02 05:02:27",
"2013-02-02 10:02:54", "2013-02-02 11:02:14", "2013-03-01 01:02:37",
"2013-03-01 02:02:07", "2013-03-01 02:12:09", "2013-03-01 13:02:30",
"2013-04-04 02:02:33", "2013-04-04 09:02:54", "2013-04-09 10:02:01",
"2013-04-09 21:02:22"),
value=c(12.5, 16.7, 16.7, 16.7, 12.5, 12.6, 16.7, 16.8, 16.7, 16.8,
16.8, 16.7, 16.8),
group=c("B", "A", "A", "A", "B", "A", "A", "A", "A", "A", "A", "A",
"A")
)
dtf$x <- as.double(as.POSIXct(dtf$timestamp))
plt1 <- rPlot(x= 'timestamp',
y='value' ,
data=dtf,
type = 'point',
size=list(const=2))
plt2 <- rPlot(x= 'x',
y='value' ,
data=dtf,
type = 'point',
size=list(const=2))
print(plt1)
print(plt2)
最初のプロット (plt1) は次のようになります。
2 つ目は次のとおりです。
ご覧のとおり、時間/分の値に関係なく、同じ日付に含まれるデータ ポイントの X 座標が同じになるように、日付が切り捨てられます。両方のプロットに表示されるツールチップも切り捨てられます。ポリチャートを使用して時間/分の解像度を維持するにはどうすればよいですか?
編集
これをいじってみると、polychart は 10^9 を超える X 値をうまく処理できないという結論に達しました。私はまだこれを解決する方法を見つけることができませんでした。