Tugas Kelompok D

Nomor 1

Buat array 1D berisi angka ganjil dari 5 sampai 100.

Penjelasan

Menggunakan fungsi seq() untuk membuat angka ganjil dari 5 sampai 99. Kemudian array dibuat dari vektor tersebut.

# Membuat array 1D berisi angka ganjil dari 5 sampai 100 menggunakan array()
arrayone = array(seq(5, 99, by = 2))
print(arrayone)

Output:

 [1]  5  7  9 11 13 15 17 19 21 23 25 27 29 31 33 35 37 39 41 43 45 47 49 51 53 55 57 59 61 63 65 67 69 71 73 75 77 79 81 83 85 87 89 91 93 95 97 99

a. Tampilkan elemen yang habis dibagi 4

habis_bagi_4 = arrayone[arrayone %% 4 == 0]
print(habis_bagi_4)

Output:

[1] numeric(0)

b. Urutkan array secara menurun (descending)

urut = sort(arrayone, decreasing = TRUE)
print(urut)

Output:

[1] 99 97 95 93 91 89 87 85 83 81 79 77 75 73 71 69 67 65 63 61 59 57 55 53 51 49 47 45 43 41 39 37 35 33 31 29 27 25 23 21 19 17 15 13 11 9 7 5

c. Hitung jumlah total dan rata-ratanya

total = sum(arrayone)
ratarata = mean(arrayone)
print(total)
print(ratarata)

Output:

Jumlah total: 2496
Rata-rata: 52

Nomor 2

Buat array 2 dimensi (m, n) yang elemennya kelipatan 4 dengan m,n > 4.

Penjelasan

Gunakan seq() untuk membuat deret kelipatan 4 dan array() untuk membentuk matriks.

m = 5
n = 6
arraytwo = array(seq(4, by = 4, length.out = m * n), dim = c(m, n))
print(arraytwo)

Output:

     [,1] [,2] [,3] [,4] [,5] [,6]
[1,]    4   24   44   64   84  104
[2,]    8   28   48   68   88  108
[3,]   12   32   52   72   92  112
[4,]   16   36   56   76   96  116
[5,]   20   40   60   80  100  120

a. Hitung berapa elemen dalam array yang bernilai lebih dari (m*n)

array_lebih = sum(arraytwo > (m * n))
print(array_lebih)

Output:

Jumlah elemen > 30 = 23

b. Tampilkan elemen pada diagonal utama

diagonal_utama = diag(arraytwo)
print(diagonal_utama)

Output:

[1]  4 28 52 76 100

c. Hitung jumlah seluruh elemen baris ke-2

jumlah_elemenb2 = sum(arraytwo[2, ])
print(jumlah_elemenb2)

Output:

Jumlah elemen baris ke-2: 348

Nomor 3

Buat array 3 dimensi (x, y, z) dari angka berurutan mulai dari yang lebih besar dari 10 hingga kurang dari 100.

Penjelasan

Gunakan array() untuk membentuk array 3 dimensi dari angka 11 hingga 99.

x = 3
y = 3
z = 5
array3 = array(sample(11:99, x*y*z), dim = c(x, y, z))  
print(array3)

Output:

, , 1

     [,1] [,2] [,3]
[1,]   24   35   19
[2,]   88   62   16
[3,]   85   73   38

, , 2

     [,1] [,2] [,3]
[1,]   57   93   54
[2,]   44   71   49
[3,]   55   34   92

, , 3

     [,1] [,2] [,3]
[1,]   91   61   80
[2,]   70   95   65
[3,]   47   32   78

, , 4

     [,1] [,2] [,3]
[1,]   33   27   39
[2,]   63   66   77
[3,]   20   43   82

, , 5

     [,1] [,2] [,3]
[1,]   36   48   67
[2,]   15   22   42
[3,]   50   46   52

a. Tampilkan seluruh elemen pada lapisan ke-(z - 3)

lapisan_z3 = array3[, , (z-3)]
print(lapisan_z3)

Output:

    [,1] [,2] [,3]
[1,]   57   93   54
[2,]   44   71   49
[3,]   55   34   92

b. Nilai maksimum pada seluruh array

nilai_max = max(array3)
print(nilai_max)

Output:

[1] 95

c. Rata-rata per kolom

ratakolom = apply(array3, c(2), mean)  
print(ratakolom)

Output :

[1] 48.80000 57.33333 77.53333