先日、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 プロットを再現する方法を教えてください。