a <- 42
b <- 3.14
c <- "Hello"
d <- FALSE
e <- list(1, 2, 3)
f <- list(name = "Alice", age = 25) # Menggunakan list untuk menyimpan key-value
# menggunakan class() untuk mengidentifikasi tipe data
print(class(a))
## [1] "numeric"
print(class(b))
## [1] "numeric"
print(class(c))
## [1] "character"
print(class(d))
## [1] "logical"
print(class(e))
## [1] "list"
print(class(f))
## [1] "list"
1.2 VARIABEL DAN
MANIPULASI DATA
perbarui nilai x dengan ditambah 10.
gabungkan text1 dan text2 menjadi “Data
Science”.
ubah teks yang digabungkan menjadi huruf besar/kapital.
x <- 20
y <- 5
text1 <- "Data"
text2 <- "Science"
x <- x + 10
print(x)
## [1] 30
# Menggabungkan string menggunakan paste()
print(paste0(text1, text2))
## [1] "DataScience"
# Mengubah ke huruf besar dengan toupper()
print(toupper(paste0(text1, text2)))
## [1] "DATASCIENCE"
1.3 OPERASI
ARITMATIKA
hitung jumlah, selisih, produk, pembagian, modulo dari a dan b.
hitung a dipangkatkan dengan b.
buat variabel baru c=a/b lalu konversi menjadi integer
a <- 15
b <- 4
print(a + b) # Penjumlahan
## [1] 19
print(a - b) # Pengurangan
## [1] 11
print(a * b) # Perkalian
## [1] 60
print(a / b) # Pembagian
## [1] 3.75
print(a %% b) # Modulus (sisa bagi)
## [1] 3
print(a ^ b) # Pangkat
## [1] 50625
c <- a / b
print(as.integer(c)) # Konversi ke bilangan bulat
## [1] 3
1.4 OPERASI STRING
ekstrak 5 karakter pertama dari text.
hitung jumlah karakter dalam text
konversi text menjadi huruf kecil.
text <- "Hello, Data Science!"
# Mengambil 5 karakter pertama (R menggunakan substr)
print(substr(text, 1, 5))
## [1] "Hello"
# Menghitung jumlah karakter dalam teks
print(nchar(text))
## [1] 20
# Konversi ke huruf kecil
print(tolower(text))
## [1] "hello, data science!"
1.5 OPERATOR LOGIKA DAN
PERBANDINGAN
cek x lebih besar daripada y
cek jika x kurang dari sama dengan y
cek jika x tidak sama dengan y
evaluasi (x>5) AND (y<20)
x <- 7
y <- 10
# Cek apakah x lebih besar dari y
print(x > y)
## [1] FALSE
# Cek apakah x kurang dari atau sama dengan y
print(x <= y)
## [1] TRUE
# Cek apakah x tidak sama dengan y
print(x != y)
## [1] TRUE
# Evaluasi (x > 5) AND (y < 20)
print((x > 5) & (y < 20)) # Menggunakan '&' untuk AND dalam kondisi logika
## [1] TRUE
1.6 KONVERSI TIPE
DATA
ubah string ke integer lalu ditambah 10.
ubah float ke integer.
ubah float kembali jadi string
num_str <- "123"
num_float <- 45.67
# Konversi string ke integer dan tambahkan 10
print(as.integer(num_str) + 10)
## [1] 133
# Konversi float (numeric) ke integer
print(as.integer(num_float))
## [1] 45
# Konversi float (numeric) ke string
print(as.character(num_float))
## [1] "45.67"
1.7 BONUS
interactive program that asks the user to input:
name
age
hometown
# Meminta input dari pengguna
name <- readline("Enter your name: ")
## Enter your name:
age <- readline("Enter your age: ")
## Enter your age:
hometown <- readline("Enter your hometown: ")
## Enter your hometown:
# Menampilkan hasil dengan sprintf()
message <- sprintf("Hello %s, you are %s years old and from %s.", name, age, hometown)
print(message)
