Nama : Muhammad Hafidlul Qolbi

NIM : 220605110063

Kelas : A

Mata Kuliah : Linear Algebra

Dosen Pengampuh : Prof. Dr. Suhartono, M.Kom

Jurusan : Teknik Informatika

Lembaga : Universitas Islam Negeri Maulana Malik Ibrahim Malang

===========================================================================================

Ini adalah salah satu contoh dari cara pembuatan suatu bangun ruang pada RStudio

library(rgl)
## Warning: package 'rgl' was built under R version 4.2.3
dat <- replicate(2, 1:3)
dat
##      [,1] [,2]
## [1,]    1    1
## [2,]    2    2
## [3,]    3    3
data = data.frame(
    x = rep( c(0.1, 0.2, 0.3, 0.4, 0.5), each=5),
    y = rep( c(1, 2, 3, 4, 5), 5)
)
data$z = runif(
    25,
    min = (data$x*data$y - 0.1 * (data$x*data$y)),
    max = (data$x*data$y + 0.1 * (data$x*data$y))
)

data
##      x y          z
## 1  0.1 1 0.09087381
## 2  0.1 2 0.20019485
## 3  0.1 3 0.28052794
## 4  0.1 4 0.36937005
## 5  0.1 5 0.48512874
## 6  0.2 1 0.21026558
## 7  0.2 2 0.38778537
## 8  0.2 3 0.60409614
## 9  0.2 4 0.82812163
## 10 0.2 5 0.94197893
## 11 0.3 1 0.32719629
## 12 0.3 2 0.61730953
## 13 0.3 3 0.96584232
## 14 0.3 4 1.13829768
## 15 0.3 5 1.40941814
## 16 0.4 1 0.37263146
## 17 0.4 2 0.78271374
## 18 0.4 3 1.22002672
## 19 0.4 4 1.55945947
## 20 0.4 5 2.05804369
## 21 0.5 1 0.50568009
## 22 0.5 2 0.91614265
## 23 0.5 3 1.59447617
## 24 0.5 4 1.98466734
## 25 0.5 5 2.26315344
str(data)
## 'data.frame':    25 obs. of  3 variables:
##  $ x: num  0.1 0.1 0.1 0.1 0.1 0.2 0.2 0.2 0.2 0.2 ...
##  $ y: num  1 2 3 4 5 1 2 3 4 5 ...
##  $ z: num  0.0909 0.2002 0.2805 0.3694 0.4851 ...
library(scatterplot3d)
## Warning: package 'scatterplot3d' was built under R version 4.2.3
scatterplot3d(x = data$x, y = data$y, z = data$z)

Sumber Referensi: Ruriko Yoshida - Linear Algebra and its Application with R, https://stackoverflow.com/questions/6720526/plot-3d-data-in-r