Fungsi Dasar dalam R

#Menyimpan Data dalam variabel (Fungsi c) dan Mengeksekusinya

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

## [1] 10 20 40 15 40

simpan[3]

## [1] 40

simpan[4]

## [1] 15

simpan=c(10,20,40,15,40)
simpan[4]

## [1] 15

simpan[c(1,3,4)]

## [1] 10 40 15

simpan[2:4]

## [1] 20 40 15

#Mengubah Nilai Data dalam Variabel

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

## [1] 10 20 40 15 40

simpan[3]=100
simpan[4]=10000
simpan

## [1]    10    20   100 10000    40

#Menghapus Nilai Data dalam Variabel

NILAI=c(10,40,45,30,80)
NILAI

## [1] 10 40 45 30 80

NILAI=NILAI[-3]
NILAI

## [1] 10 40 30 80

NILAI=NILAI[-4]
NILAI

## [1] 10 40 30

NILAI=NILAI[c(-1,-3)]
NILAI

## [1] 40

#Gambar 2.22

NILAI=c(100,95,70,80,25,60,80,60,55,90)
NILAI

##  [1] 100  95  70  80  25  60  80  60  55  90

NILAI[NILAI>80]

## [1] 100  95  90

#Gambar 2.24

NILAI=c(100,95,70,80,25,60,80,60,55,90)
NILAI

##  [1] 100  95  70  80  25  60  80  60  55  90

NILAI[NILAI<70]

## [1] 25 60 60 55

#Gambar 2.26

NILAI=c(100,95,70,80,25,60,80,60,55,90)
NILAI

##  [1] 100  95  70  80  25  60  80  60  55  90

NILAI[NILAI>60&NILAI<80]

## [1] 70

#Gambar2.28

NILAI=c(100,95,70,80,25,60,80,60,55,90)
NILAI

##  [1] 100  95  70  80  25  60  80  60  55  90

NILAI[NILAI>80|NILAI<30]

## [1] 100  95  25  90

#Gambar 2.30

NILAI=c(100,95,70,80,25,60,80,60,55,90)
NILAI

##  [1] 100  95  70  80  25  60  80  60  55  90

NILAI[NILAI<75]

## [1] 70 25 60 60 55

Gambar 2.32

NILAI=c(100,95,70,80,25,60,80,60,55,90)
NILAI

##  [1] 100  95  70  80  25  60  80  60  55  90

NILAI=NILAI[NILAI>90]
NILAI

## [1] 100  95

Gambar 2.34

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