Import data CSV

Data koperasi yang sudah dibuat terdapat 10 data Koperasi dengan 3 variabel.

datasetcsv <- read.table("F:/uun/UIN/MULTIVATIATIVE/TUGAS/datasetkoperasi.csv", header=TRUE, sep=";")

Simpan hasil import data koperasi sebagai matriks dengan nama “X”

X <- as.matrix(datasetcsv)

Melihat dimensi Matrix

dim(X)
## [1] 10  3

Menampilkan header kolom

head(X)
##      Aset.Koperasi Omzet.Koperasi Jumlah.Anggota.Koperasi
## [1,]       3195000        1314000                      28
## [2,]      42843030       11396000                      40
## [3,]      37652000       36087000                      36
## [4,]     336974952      472168003                     211
## [5,]    1962994057       84272500                      50
## [6,]      35935000        9352000                      53

Jadikan matrix X sebagai class

class(X)
## [1] "matrix" "array"

Menghitung Mean Matrix

Hitung mean Matrix berdasarkan Baris

rowMeans(X)[1:10]
##  [1]    1503009   18079690   24579679  269714389  682422202   15095684
##  [7]    8500020  212715085 1659190190 9193248857

Hitung mean Matrix berdasarkan kolom

colMeans(X)[1:3]
##           Aset.Koperasi          Omzet.Koperasi Jumlah.Anggota.Koperasi 
##            2022579314.5            1602934911.3                   415.9

Mencari Variance dan Covariance Matrix

Simpan Covariance Matrix kedalam Matrix “S”

S <-cov(X)

Melihat dimensi Covariance Matrix

dim(S)
## [1] 3 3

Melihat nilai Variance Matrix dari baris 1 kolom 1

var(X[,1])
## [1] 20433595665390018560

Melihat nilai Variance Matrix dari baris 2 kolom 2

var(X[,2])
## [1] 16486238042145785856

Melihat nilai Variance Matrix dari baris 3 kolom 3

var(X[,3])
## [1] 1314781

Melihat nilai Covariance Matrix Baris 1 Kolom 2

S[1,2]
## [1] 18164485134624038912

Melihat nilai Covariance Matrix Baris 1 Kolom 3

S[1,3]
## [1] 5025764557343

Melihat nilai Covariance Matrix Baris 2 Kolom 1

S[2,1]
## [1] 18164485134624038912

Melihat nilai Covariance Matrix Baris 2 Kolom 3

S[2,3]
## [1] 4593775636514

Melihat nilai Covariance Matrix Baris 3 Kolom 1

S[3,1]
## [1] 5025764557343

Melihat nilai Covariance Matrix Baris 3 Kolom 2

S[3,2]
## [1] 4593775636514

Melihat hasil Covariance Matrix “S”

S[1:3,1:3]
##                                Aset.Koperasi       Omzet.Koperasi
## Aset.Koperasi           20433595665390018560 18164485134624038912
## Omzet.Koperasi          18164485134624038912 16486238042145785856
## Jumlah.Anggota.Koperasi        5025764557343        4593775636514
##                         Jumlah.Anggota.Koperasi
## Aset.Koperasi                     5025764557343
## Omzet.Koperasi                    4593775636514
## Jumlah.Anggota.Koperasi                 1314781