使用するパッケージ（パッケージのインストール）
library(rgl)
データセット lm02 をdatに格納します（ファイルの読み込み）
dat <- read.csv("lm02.csv", header=T, fileEncoding = "UTF-8")
データの確認
head(dat)
年齢、BMI、FIM差のデータをdat2に取り出します
dat1 <- dat[, c("年齢", "BMI", "FIM差")]
plot3dが日本語表示に対応していないため、列名を英数字に変更します
colnames(dat1) <- c("Age", "BMI", "FIMd")
head(dat1)
パッケージ rgl の plot3d 関数で3Dのグラフを作成して、ドラッグでグラフが操作できます
rgl::plot3d(dat1, type = "h")
ダメ出し 間違い、分かりにくい部分などのご意見をお待ちします