# Simulasi isi data dari file data2.txt
isi_teks <- "75 90 35 51 50 56 35 80 70 80
68 29 58 66 89 81 86 70 94 67
35 47 67 87 37 30 66 58 59 55
67 76 80 78 60 90 69 80 76 87"

# Membaca data menggunakan fungsi scan lewat textConnection
data_scan <- scan(textConnection(isi_teks))

# Membuat matriks berukuran 4x10
matriks2 <- matrix(data_scan, nrow = 4, ncol = 10, byrow = TRUE)

# Menampilkan hasil matriks2
print(matriks2)