Perulangan for

R Tingkat Menengah

Filip Schouwenaars

DataCamp Instructor

perulangan for

for(var in seq) {
  expr
}

cities <- c("New York", "Paris", 
            "London", "Tokyo",              
            "Rio de Janeiro", "Cape Town")
cities

"New York"   "Paris"  ...  "Cape Town"

perulangan for

for(var in seq) {
  expr
}

cities <- c("New York", "Paris", 
            "London", "Tokyo",              
            "Rio de Janeiro", "Cape Town")

for(var in seq) {
  expr
}

perulangan for

for(var in seq) {
  expr
}

cities <- c("New York", "Paris", 
            "London", "Tokyo",              
            "Rio de Janeiro", "Cape Town")

for(city in cities) {
  expr
}

perulangan for

for(var in seq) {
  expr
}

cities <- c("New York", "Paris", 
            "London", "Tokyo",              
            "Rio de Janeiro", "Cape Town")

for(city in cities) {
  print(city)
}

perulangan for

for(var in seq) {
  expr
}

cities <- c("New York", "Paris", 
            "London", "Tokyo",              
            "Rio de Janeiro", "Cape Town")

for(city in cities) {
  print(city)
}

"New York"

perulangan for

for(var in seq) {
  expr
}

cities <- c("New York", "Paris", 
            "London", "Tokyo",              
            "Rio de Janeiro", "Cape Town")

for(city in cities) {
  print(city)
}

"Paris"

perulangan for

cities <- c("New York", "Paris", 
            "London", "Tokyo",
            "Rio de Janeiro", "Cape Town")

for(city in cities) {
  print(city)
}

"New York"
"Paris"
"London"
"Tokyo"
"Rio de Janeiro"
"Cape Town"

perulangan for pada list

cities <- list("New York", "Paris", 
            "London", "Tokyo",
            "Rio de Janeiro", "Cape Town")

for(city in cities) {
  print(city)
}

"New York"
"Paris"
"London"
"Tokyo"
"Rio de Janeiro"
"Cape Town"

pernyataan break

cities <- list("New York", "Paris", 
            "London", "Tokyo",
            "Rio de Janeiro", "Cape Town")

for(city in cities) {
  if(nchar(city) == 6) {
    break
  }
  print(city)
}

pernyataan break

cities <- list("New York", "Paris", 
            "London", "Tokyo",
            "Rio de Janeiro", "Cape Town")

for(city in cities) {
  if(nchar(city) == 6) {
    break
  }
  print(city)
}

"New York"

"Paris"

pernyataan next

cities <- list("New York", "Paris", 
            "London", "Tokyo",
            "Rio de Janeiro", "Cape Town")

for(city in cities) {
  if(nchar(city) == 6) {
    next
  }
  print(city)
}

"New York"
"Paris"
"Tokyo"
"Rio de Janeiro"
"Cape Town"

perulangan for: v2

cities <- c("New York", "Paris", 
            "London", "Tokyo",            
            "Rio de Janeiro", "Cape Town")

for(city in cities) {
  print(city)
}

perulangan for: v2

cities <- c("New York", "Paris", 
            "London", "Tokyo",
            "Rio de Janeiro", "Cape Town")

for(i in 1:length(cities)) {
  print(city)
}

perulangan for: v2

cities <- c("New York", "Paris", 
            "London", "Tokyo",
            "Rio de Janeiro", "Cape Town")

for(i in 1:length(cities)) {
  print(cities[i])
}

"New York"
"Paris"
"London"
"Tokyo"
"Rio de Janeiro"
"Cape Town"

perulangan for: v2

cities <- c("New York", "Paris", 
            "London", "Tokyo", 
            "Rio de Janeiro", "Cape Town")

for(i in 1:length(cities)) {
  print(paste(cities[i], "is on position", 
              i, "in the cities vector."))
}

"New York is on position 1 in the cities vector."
"Paris is on position 2 in the cities vector."
"London is on position 3 in the cities vector."
"Tokyo is on position 4 in the cities vector."
"Rio de Janeiro is on position 5 in the cities vector."
"Cape Town is on position 6 in the cities vector."

perulangan for: ringkasan

cities <- c("New York", "Paris", 
            "London", "Tokyo",
            "Rio de Janeiro", "Cape Town")

#Ringkas, mudah dibaca, tapi tidak ada akses ke indeks
for(city in cities) {
  print(city)
}

#Lebih sulit dibaca/ditulis, tapi lebih fleksibel
for(i in 1:length(cities)) {
  print(cities[i])
}

Ayo berlatih!

R Tingkat Menengah