Fungsi Dasar Dalam R

simpan = c(10, 20, 40, 15, 40)
simpan

## [1] 10 20 40 15 40

fungsi=function(x)
{
  for(i in 1:length(x))
  {
    if(x[i]<65)
    {
      x[i]=x[i]+10;
    }
    print(x[i])
  }
}
A=c(100,95,70,80,25,60,80,60,55,90)
fungsi(A)

## [1] 100
## [1] 95
## [1] 70
## [1] 80
## [1] 35
## [1] 70
## [1] 80
## [1] 70
## [1] 65
## [1] 90