Email             :
RPubs            : https://rpubs.com/ferdnw/
Jurusan          : Statistika Bisnis
Address         : ARA Center, Matana University Tower
                         Jl. CBD Barat Kav, RT.1, Curug Sangereng, Kelapa Dua, Tangerang, Banten 15810.


1 Sintaks Dasar

1.1 Penugasan Variabel

Suatu Variabel biasa digunakan untuk merekam jenis data ke memori system

x=7
13->y
z<-8
print(c(x,y,z))
## [1]  7 13  8

1.2 Menambahkan Komentar

Menambahkan/Memberikan komentar dalam skrip/koding R adalah untuk memudahkan anda memahami arti/makna penggunaan suatu perintah/program

x=11 # Mengganti nilai x dari yang sudah direkam
z<-x+4 #Mengganti nilai z dari yang sudah direkam 
y=2*x #Mengganti nilai y dari yag sudah direkam
print(c(x,y,z))
## [1] 11 22 15

2 Operator

Operator adalah simbol yang mengarahkan compiler untuk melakukan berbagai macam operasi terhadap beberapa penugasan. Operator mensimulasikan berbagai operasi matematis, logika, dan keputusan yang dilakukan pada sekumpulan Bilangan Kompleks, Integer, dan Numerik sebagai penugasan masukan (input).

2.1 Aritmatika

Aritmatika Penggunaan operator aritmatika dalam program R adalah untuk mensimulasikan berbagai operasi matematika

x=c(6,8,12) # Nilai vektor x
y=c(5,10,8) # Nilai Vektor y
cat("Penjumlahan vektor x dan y :", x+y, "\n")
## Penjumlahan vektor x dan y : 11 18 20
cat("Pengurangan vektor x dan y :", x-y, "\n")
## Pengurangan vektor x dan y : 1 -2 4
cat("Pembagian vektor x dan y :", x/y, "\n")
## Pembagian vektor x dan y : 1.2 0.8 1.5
cat("Perkalian vektor x dan y :", x*y, "\n")
## Perkalian vektor x dan y : 30 80 96
cat("Pemangkatan vektor x dan y :", x^y, "\n")
## Pemangkatan vektor x dan y : 7776 1073741824 429981696
cat("Modulo vektor x dan y :", x%%y, "\n")
## Modulo vektor x dan y : 1 8 4

2.2 Relasional

Digunakan untuk Membandingkan elemen yang bersesuaian

x=c(6,8,12) # Nilai vektor x
y=c(5,10,8) # Nilai Vektor y
cat("Vektor x kurang dari vektor y :", x<y, "\n")
## Vektor x kurang dari vektor y : FALSE TRUE FALSE
cat("Vektor x kurang dari sama dengan vektor y :", x<=y, "\n")
## Vektor x kurang dari sama dengan vektor y : FALSE TRUE FALSE
cat("Vektor x lebih dari vektor y :", x>y, "\n")
## Vektor x lebih dari vektor y : TRUE FALSE TRUE
cat("Vektor x lebih dari sama dengan vektor y :", x>=y, "\n")
## Vektor x lebih dari sama dengan vektor y : TRUE FALSE TRUE
cat("Vektor x sama dengan vektor y :", x==y, "\n")
## Vektor x sama dengan vektor y : FALSE FALSE FALSE
cat("Vektor x tidak sama dengan vektor y :", x=!y, "\n")
## Vektor x tidak sama dengan vektor y : FALSE FALSE FALSE

2.3 Logika

Operator logis mensimulasikan operasi keputusan, berdasarkan operator yang ditentukan antar operan, yang kemudian dievaluasi ke nilai Boolean Benar atau Salah.

x=c(0.5,FALSE,0) # Nilai vektor x
y=c(TRUE,10,1+5i) # Nilai Vektor y
cat("Logika Negasi (~) untuk vektor x :", !x, "\n")
## Logika Negasi (~) untuk vektor x : FALSE TRUE TRUE
cat("Logika Negasi (~) untuk vektor y :", !y, "\n")
## Logika Negasi (~) untuk vektor y : FALSE FALSE FALSE
cat("Logika Konjungsi (DAN)  :", x&y, "\n")
## Logika Konjungsi (DAN)  : TRUE FALSE FALSE
cat("Logika Disjungsi (ATAU)  :", x|y, "\n")
## Logika Disjungsi (ATAU)  : TRUE TRUE TRUE
cat("Logika Disjungsi Parsial  :", x||y, "\n")
## Logika Disjungsi Parsial  : TRUE

2.4 Lain-lain

x=c(3,6,12) #nilai vektor x
y=c(2,8,16) #nilai vektor y 
sqrt(x*y)
## [1]  2.449490  6.928203 13.856406
log(x) #logaritma
## [1] 1.098612 1.791759 2.484907
exp(y) #exponensial 
## [1] 7.389056e+00 2.980958e+03 8.886111e+06
(x/y)+x #tanda kurung
## [1]  4.50  6.75 12.75

3 Data Type

j=7.3 #Nilai Desimal (Double/Float)
k=8L #tetapkan Nilai Integer
l=c(TRUE,TRUE,FALSE) #Bolean/Logical 
m ="Phantom"  #String/Character 
n = 2*3i #Complex

Sebuah Tips jika ingin memasukan data integer, pastikan menuliskan karakter “L” atau .0 dibelakang angka tersebut, atau menuliskan as.integer di depan, jika tidak system akan menganggap itu adalah data float. Contoh:

z=3
typeof(z)
## [1] "double"

Sedangkan jika diawali as.integer

z=as.integer(3)
typeof(z)
## [1] "integer"

Untuk Memeriksa kelas dan tipe data

class(j) # Menentukan kelas data dari j
## [1] "numeric"
typeof(j) #Menentukan tipe data j
## [1] "double"

4 Help

help.start( )#  menavigasi bantuan lokal berbasis web
?help #  menavigasi bantuan lokal berbasis web
?class # mendapatkan bantuan untuk fungsi class
help(class) # mendapatkan bantuan untuk fungsi class
??class # Mencari tahu fungsi class yang dicari
help.search('class') # Mengetahui nama fungsi yang dicari
LS0tDQp0aXRsZTogIkFsZ29yaXRtYSBkYW4gU3RydWt0dXIgRGF0YSINCnN1YnRpdGxlOiAiVHVnYXMgMiAiDQphdXRob3I6ICJGZXJkaW5hbmQgTmF0aGFuaWVsIFdpZGpheWEgKDIwMjE0OTIwMDA2KSINCmRhdGU6ICJgciBmb3JtYXQoU3lzLkRhdGUoKSwgJyVCICVkLCAlWScpYCINCm91dHB1dDogDQogIGh0bWxfZG9jdW1lbnQ6IA0KICAgIGh0bWxfZG9jdW1lbnQ6IG51bGwNCiAgICBjb2RlX2ZvbGRpbmc6IGhpZGUNCiAgICB0b2M6IHllcw0KICAgIHRvY19mbG9hdDoNCiAgICAgIGNvbGxhcHNlZDogeWVzICANCiAgICBudW1iZXJfc2VjdGlvbnM6IHllcw0KICAgIGNvZGVfZG93bmxvYWQ6IHllcw0KICAgIHRoZW1lOiBzYW5kc3RvbmUNCiAgICBjc3M6IHN0eWxlMS5jc3MNCiAgICBoaWdobGlnaHQ6IG1vbm9jaHJvbWUNCi0tLQ0KDQoNCjxpbWcgc3R5bGU9ImZsb2F0OiByaWdodDsgbWFyZ2luOiAwcHggMTAwcHggMHB4IDBweDsgd2lkdGg6MjUlIiBzcmM9ImZvdG8uanBnIi8+IA0KDQpgYGB7ciBsb2dvLCBlY2hvPUZBTFNFLGZpZy5hbGlnbj0nY2VudGVyJywgb3V0LndpZHRoID0gJzMwJSd9DQprbml0cjo6aW5jbHVkZV9ncmFwaGljcygibG9nb21hdGFuYS5wbmciKQ0KYGBgDQoNCkVtYWlsICZuYnNwOyZuYnNwOyZuYnNwOyZuYnNwOyZuYnNwOyAmbmJzcDsgJm5ic3A7ICZuYnNwOyZuYnNwOzogIGZlcmRpbmFuZC53aWRqYXlhQHN0dWRlbnQubWF0YW5hdW5pdmVyc2l0eS5hYy5pZCA8YnI+DQpSUHVicyAgJm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7ICZuYnNwOyAmbmJzcDsgJm5ic3A7OiBodHRwczovL3JwdWJzLmNvbS9mZXJkbncvIDxicj4NCkp1cnVzYW4gJm5ic3A7ICZuYnNwOyAmbmJzcDsgJm5ic3A7ICZuYnNwOzogW1N0YXRpc3Rpa2EgQmlzbmlzXShodHRwczovL21hdGFuYXVuaXZlcnNpdHkuYWMuaWQvP2x5PWFjYWRlbWljJmM9c2IpIDxicj4NCkFkZHJlc3MgICZuYnNwOyAmbmJzcDsgJm5ic3A7ICZuYnNwOyA6IEFSQSBDZW50ZXIsIE1hdGFuYSBVbml2ZXJzaXR5IFRvd2VyIDxicj4NCiZuYnNwOyAmbmJzcDsgJm5ic3A7ICZuYnNwOyAmbmJzcDsgJm5ic3A7ICZuYnNwOyAmbmJzcDsgJm5ic3A7ICZuYnNwOyAmbmJzcDsgJm5ic3A7Jm5ic3A7IEpsLiBDQkQgQmFyYXQgS2F2LCBSVC4xLCBDdXJ1ZyBTYW5nZXJlbmcsIEtlbGFwYSBEdWEsIFRhbmdlcmFuZywgQmFudGVuIDE1ODEwLg0KDQoqKioqDQoNCiMgU2ludGFrcyBEYXNhcg0KDQojIyBQZW51Z2FzYW4gVmFyaWFiZWwgDQoNClN1YXR1IFZhcmlhYmVsIGJpYXNhIGRpZ3VuYWthbiB1bnR1ayBtZXJla2FtIGplbmlzIGRhdGEga2UgbWVtb3JpIHN5c3RlbQ0KDQpgYGB7cn0NCng9Nw0KMTMtPnkNCno8LTgNCnByaW50KGMoeCx5LHopKQ0KYGBgDQoNCiMjIE1lbmFtYmFoa2FuIEtvbWVudGFyIA0KDQpNZW5hbWJhaGthbi9NZW1iZXJpa2FuIGtvbWVudGFyIGRhbGFtIHNrcmlwL2tvZGluZyBSICBhZGFsYWggdW50dWsgbWVtdWRhaGthbg0KYW5kYSBtZW1haGFtaSBhcnRpL21ha25hIHBlbmdndW5hYW4gc3VhdHUgcGVyaW50YWgvcHJvZ3JhbQ0KDQpgYGB7cn0NCng9MTEgIyBNZW5nZ2FudGkgbmlsYWkgeCBkYXJpIHlhbmcgc3VkYWggZGlyZWthbQ0KejwteCs0ICNNZW5nZ2FudGkgbmlsYWkgeiBkYXJpIHlhbmcgc3VkYWggZGlyZWthbSANCnk9Mip4ICNNZW5nZ2FudGkgbmlsYWkgeSBkYXJpIHlhZyBzdWRhaCBkaXJla2FtDQpwcmludChjKHgseSx6KSkNCmBgYA0KDQojIE9wZXJhdG9yDQoNCk9wZXJhdG9yIGFkYWxhaCBzaW1ib2wgeWFuZyBtZW5nYXJhaGthbiBjb21waWxlciB1bnR1ayBtZWxha3VrYW4gYmVyYmFnYWkgbWFjYW0gb3BlcmFzaSB0ZXJoYWRhcCBiZWJlcmFwYSBwZW51Z2FzYW4uIE9wZXJhdG9yIG1lbnNpbXVsYXNpa2FuIGJlcmJhZ2FpIG9wZXJhc2kgbWF0ZW1hdGlzLCBsb2dpa2EsIGRhbiBrZXB1dHVzYW4geWFuZyBkaWxha3VrYW4gcGFkYSBzZWt1bXB1bGFuIEJpbGFuZ2FuIEtvbXBsZWtzLCBJbnRlZ2VyLCBkYW4gTnVtZXJpayBzZWJhZ2FpIHBlbnVnYXNhbiBtYXN1a2FuIChpbnB1dCkuIA0KDQojIyBBcml0bWF0aWthIA0KDQpBcml0bWF0aWthDQpQZW5nZ3VuYWFuIG9wZXJhdG9yIGFyaXRtYXRpa2EgZGFsYW0gcHJvZ3JhbSBSIGFkYWxhaCB1bnR1ayBtZW5zaW11bGFzaWthbiBiZXJiYWdhaSBvcGVyYXNpIG1hdGVtYXRpa2ENCg0KYGBge3J9DQp4PWMoNiw4LDEyKSAjIE5pbGFpIHZla3RvciB4DQp5PWMoNSwxMCw4KSAjIE5pbGFpIFZla3RvciB5DQpjYXQoIlBlbmp1bWxhaGFuIHZla3RvciB4IGRhbiB5IDoiLCB4K3ksICJcbiIpDQpgYGANCg0KYGBge3J9DQpjYXQoIlBlbmd1cmFuZ2FuIHZla3RvciB4IGRhbiB5IDoiLCB4LXksICJcbiIpDQpgYGANCg0KYGBge3J9DQpjYXQoIlBlbWJhZ2lhbiB2ZWt0b3IgeCBkYW4geSA6IiwgeC95LCAiXG4iKQ0KYGBgDQoNCmBgYHtyfQ0KY2F0KCJQZXJrYWxpYW4gdmVrdG9yIHggZGFuIHkgOiIsIHgqeSwgIlxuIikNCmBgYA0KYGBge3J9DQpjYXQoIlBlbWFuZ2thdGFuIHZla3RvciB4IGRhbiB5IDoiLCB4XnksICJcbiIpDQpgYGANCg0KYGBge3J9DQpjYXQoIk1vZHVsbyB2ZWt0b3IgeCBkYW4geSA6IiwgeCUleSwgIlxuIikNCmBgYA0KDQojIyBSZWxhc2lvbmFsDQoNCkRpZ3VuYWthbiB1bnR1ayBNZW1iYW5kaW5na2FuIGVsZW1lbiB5YW5nIGJlcnNlc3VhaWFuDQoNCmBgYHtyfQ0KeD1jKDYsOCwxMikgIyBOaWxhaSB2ZWt0b3IgeA0KeT1jKDUsMTAsOCkgIyBOaWxhaSBWZWt0b3IgeQ0KY2F0KCJWZWt0b3IgeCBrdXJhbmcgZGFyaSB2ZWt0b3IgeSA6IiwgeDx5LCAiXG4iKQ0KYGBgDQoNCmBgYHtyfQ0KY2F0KCJWZWt0b3IgeCBrdXJhbmcgZGFyaSBzYW1hIGRlbmdhbiB2ZWt0b3IgeSA6IiwgeDw9eSwgIlxuIikNCmBgYA0KDQpgYGB7cn0NCmNhdCgiVmVrdG9yIHggbGViaWggZGFyaSB2ZWt0b3IgeSA6IiwgeD55LCAiXG4iKQ0KYGBgDQoNCmBgYHtyfQ0KY2F0KCJWZWt0b3IgeCBsZWJpaCBkYXJpIHNhbWEgZGVuZ2FuIHZla3RvciB5IDoiLCB4Pj15LCAiXG4iKQ0KYGBgDQoNCmBgYHtyfQ0KY2F0KCJWZWt0b3IgeCBzYW1hIGRlbmdhbiB2ZWt0b3IgeSA6IiwgeD09eSwgIlxuIikNCmBgYA0KDQpgYGB7cn0NCmNhdCgiVmVrdG9yIHggdGlkYWsgc2FtYSBkZW5nYW4gdmVrdG9yIHkgOiIsIHg9IXksICJcbiIpDQpgYGANCg0KIyMgTG9naWthIA0KDQpPcGVyYXRvciBsb2dpcyBtZW5zaW11bGFzaWthbiBvcGVyYXNpIGtlcHV0dXNhbiwgYmVyZGFzYXJrYW4gb3BlcmF0b3IgeWFuZyBkaXRlbnR1a2FuIGFudGFyIG9wZXJhbiwgeWFuZyBrZW11ZGlhbiBkaWV2YWx1YXNpIGtlIG5pbGFpIEJvb2xlYW4gQmVuYXIgYXRhdSBTYWxhaC4NCg0KYGBge3J9DQp4PWMoMC41LEZBTFNFLDApICMgTmlsYWkgdmVrdG9yIHgNCnk9YyhUUlVFLDEwLDErNWkpICMgTmlsYWkgVmVrdG9yIHkNCmNhdCgiTG9naWthIE5lZ2FzaSAofikgdW50dWsgdmVrdG9yIHggOiIsICF4LCAiXG4iKQ0KYGBgDQoNCmBgYHtyfQ0KY2F0KCJMb2dpa2EgTmVnYXNpICh+KSB1bnR1ayB2ZWt0b3IgeSA6IiwgIXksICJcbiIpDQpgYGANCg0KYGBge3J9DQpjYXQoIkxvZ2lrYSBLb25qdW5nc2kgKERBTikgIDoiLCB4JnksICJcbiIpDQpgYGANCg0KYGBge3J9DQpjYXQoIkxvZ2lrYSBEaXNqdW5nc2kgKEFUQVUpICA6IiwgeHx5LCAiXG4iKQ0KYGBgDQoNCmBgYHtyfQ0KY2F0KCJMb2dpa2EgRGlzanVuZ3NpIFBhcnNpYWwgIDoiLCB4fHx5LCAiXG4iKQ0KYGBgDQoNCiMjIExhaW4tbGFpbg0KDQpgYGB7cn0NCng9YygzLDYsMTIpICNuaWxhaSB2ZWt0b3IgeA0KeT1jKDIsOCwxNikgI25pbGFpIHZla3RvciB5IA0Kc3FydCh4KnkpDQpgYGANCg0KYGBge3J9DQpsb2coeCkgI2xvZ2FyaXRtYQ0KYGBgDQogIA0KYGBge3J9DQpleHAoeSkgI2V4cG9uZW5zaWFsIA0KYGBgDQogIA0KYGBge3J9DQooeC95KSt4ICN0YW5kYSBrdXJ1bmcNCmBgYA0KICANCiMgRGF0YSBUeXBlDQoNCmBgYHtyfQ0Kaj03LjMgI05pbGFpIERlc2ltYWwgKERvdWJsZS9GbG9hdCkNCms9OEwgI3RldGFwa2FuIE5pbGFpIEludGVnZXINCmw9YyhUUlVFLFRSVUUsRkFMU0UpICNCb2xlYW4vTG9naWNhbCANCm0gPSJQaGFudG9tIiAgI1N0cmluZy9DaGFyYWN0ZXIgDQpuID0gMiozaSAjQ29tcGxleA0KYGBgDQoNClNlYnVhaCBUaXBzIGppa2EgaW5naW4gbWVtYXN1a2FuIGRhdGEgaW50ZWdlciwgcGFzdGlrYW4gbWVudWxpc2thbiBrYXJha3RlciAiTCIgYXRhdSAuMCBkaWJlbGFrYW5nIGFuZ2thIHRlcnNlYnV0LCBhdGF1IG1lbnVsaXNrYW4gYXMuaW50ZWdlciAgIGRpIGRlcGFuLCBqaWthIHRpZGFrIHN5c3RlbSBha2FuIG1lbmdhbmdnYXAgaXR1IGFkYWxhaCBkYXRhIGZsb2F0Lg0KKkNvbnRvaDoqDQoNCmBgYHtyfQ0Kej0zDQp0eXBlb2YoeikNCmBgYA0KDQoqU2VkYW5na2FuIGppa2EgZGlhd2FsaSBhcy5pbnRlZ2VyKg0KDQpgYGB7cn0NCno9YXMuaW50ZWdlcigzKQ0KdHlwZW9mKHopDQpgYGANCg0KVW50dWsgTWVtZXJpa3NhIGtlbGFzIGRhbiB0aXBlICBkYXRhDQoNCmBgYHtyfQ0KY2xhc3MoaikgIyBNZW5lbnR1a2FuIGtlbGFzIGRhdGEgZGFyaSBqDQpgYGANCg0KYGBge3J9DQp0eXBlb2YoaikgI01lbmVudHVrYW4gdGlwZSBkYXRhIGoNCmBgYA0KDQojIEhlbHANCg0KYGBge3J9Iw0KaGVscC5zdGFydCggKSMgIG1lbmF2aWdhc2kgYmFudHVhbiBsb2thbCBiZXJiYXNpcyB3ZWINCj9oZWxwICMgIG1lbmF2aWdhc2kgYmFudHVhbiBsb2thbCBiZXJiYXNpcyB3ZWINCj9jbGFzcyAjIG1lbmRhcGF0a2FuIGJhbnR1YW4gdW50dWsgZnVuZ3NpIGNsYXNzDQpoZWxwKGNsYXNzKSAjIG1lbmRhcGF0a2FuIGJhbnR1YW4gdW50dWsgZnVuZ3NpIGNsYXNzDQo/P2NsYXNzICMgTWVuY2FyaSB0YWh1IGZ1bmdzaSBjbGFzcyB5YW5nIGRpY2FyaQ0KaGVscC5zZWFyY2goJ2NsYXNzJykgIyBNZW5nZXRhaHVpIG5hbWEgZnVuZ3NpIHlhbmcgZGljYXJpDQpgYGANCg0KIyBSZWZlcmVuc2kNCg0KaHR0cHM6Ly9ycHVicy5jb20vZHNjaWVuY2VsYWJzL2FzZDINCg0K