R Studio에서 구구단 코딩 코드 만들기

안녕하세요, 츄르 사려고 코딩하는 집사! 코집사입니다.

---

for(i in (1:9)){
  for(j in (1:9)){
    print(paste(i,"X",j,"=",i*j))
  }
}

 

C언어나 파이썬 등에서 했던 것처럼 이중 for문을 사용하여 paste를 통해 출력하면 됩니다.

 

 

 

> 1부터 x까지 3의 배수이면서 4의 배수가 아닌 것들의 합 구하기

a <- function(x){
  sum <- 0
  for(i in (1:x))
  {
    if(i %% 3 == 0 & i %% 4 != 0)
    {
      sum = sum + i
    }
  }
  
  print(sum)
}

a(100)

 

> 1부터 y까지 x의 배수인 것들의 합 구하기

q <- function(x, y){
  sum <- 0
  for(i in (1:y)){
    if(i%%x==0) sum = sum + i
  }
  print(sum)
}

q(3,100)