2

先日、1980 年から 1999 年までの出生率の経年変化を年齢別に説明している雑誌で、この 3D 写真を見ました。縦線は出生率。2 本の横線は、年齢と年です。

ここに画像の説明を入力

ぜひとも再現してみたいものです。データは次のようになると想像できます(簡略化)

dta = cbind(c(2000, 2005, 2015), 
  c(15, 20, 25), 
  c(20, 24, 35))

colnames(dta) <- c('year', 'age', 'rate')

 year age rate
 2000  15   20
 2005  20   24
 2015  25   35

いくつかの 3D ライブラリを検索したところ、パッケージplot3Dが出てきました。関数の仕組みを理解しようとしましたouter()が、理解できませんでした。

上記のような 3D プロットを再現する方法を教えてください。

4

2 に答える 2

0

「rgl」パッケージの plot3d 関数を好みます。ポイントが少ないので、見やすいように制限を調整しました。

library("rgl") plot3d(dta, xlim=c(1990, 2030), ylim=c(10,30), zlim=c(15,40))

于 2015-06-18T13:19:54.437 に答える