R data types

Convert TRUE to an integer

as.integer(TRUE)

[1] 1

What is the datatype of the value returned by Sys.time()?

class(Sys.time())

[1] "POSIXct" "POSIXt"

What is the datatype of the value returned by Sys.timezone()?

class(Sys.timezone())

[1] "character"

Make this quote into an R string - “Do you think this is a game?”, he said. “No, I think Jenga’s game”, Archer responded.

Basic operations

pi^2
pi > 3

[1] TRUE
5 > 3 & 5 <= 6

[1] TRUE
1:5 <= 3

[1]  TRUE  TRUE  TRUE FALSE FALSE

R objects

vecA * vecB

[1] 2 6
vecA * 3

[1] 3 6
vecA * vecC

[1]  1  4  3  8  5 12
vecC * vecA

[1]  1  4  3  8  5 12

Dataframes

dim(iris)

[1] 150   5
nrow(iris)

[1] 150
length(iris)

[1] 5
names(iris)

[1] "Sepal.Length" "Sepal.Width"  "Petal.Length" "Petal.Width"  "Species"     
colnames(iris)

[1] "Sepal.Length" "Sepal.Width"  "Petal.Length" "Petal.Width"  "Species"     
rownames(iris)

  [1] "1"   "2"   "3"   "4"   "5"   "6"   "7"   "8"   "9"   "10"  "11"  "12"  "13"  "14" 
 [15] "15"  "16"  "17"  "18"  "19"  "20"  "21"  "22"  "23"  "24"  "25"  "26"  "27"  "28" 
 [29] "29"  "30"  "31"  "32"  "33"  "34"  "35"  "36"  "37"  "38"  "39"  "40"  "41"  "42" 
 [43] "43"  "44"  "45"  "46"  "47"  "48"  "49"  "50"  "51"  "52"  "53"  "54"  "55"  "56" 
 [57] "57"  "58"  "59"  "60"  "61"  "62"  "63"  "64"  "65"  "66"  "67"  "68"  "69"  "70" 
 [71] "71"  "72"  "73"  "74"  "75"  "76"  "77"  "78"  "79"  "80"  "81"  "82"  "83"  "84" 
 [85] "85"  "86"  "87"  "88"  "89"  "90"  "91"  "92"  "93"  "94"  "95"  "96"  "97"  "98" 
 [99] "99"  "100" "101" "102" "103" "104" "105" "106" "107" "108" "109" "110" "111" "112"
[113] "113" "114" "115" "116" "117" "118" "119" "120" "121" "122" "123" "124" "125" "126"
[127] "127" "128" "129" "130" "131" "132" "133" "134" "135" "136" "137" "138" "139" "140"
[141] "141" "142" "143" "144" "145" "146" "147" "148" "149" "150"

Lists

mylist

$`a`
[1] 1 2 3

[[2]]
 [1] "A" "B" "C" "D" "E" "F" "G" "H" "I" "J" "K" "L" "M" "N" "O" "P" "Q" "R" "S" "T" "U"
[22] "V" "W" "X" "Y" "Z"
mylist[[1]]

[1] 1 2 3
mylist[[2]]

 [1] "A" "B" "C" "D" "E" "F" "G" "H" "I" "J" "K" "L" "M" "N" "O" "P" "Q" "R" "S" "T" "U"
[22] "V" "W" "X" "Y" "Z"
mylist[[1]] [3]

[1] 3
mylist2[[2]][1]

$`item2a`
[1] "a" "b" "c" "d" "e"
mylist2[[2]] [[1]] [3]

[1] "c"
head(mylist2)

$`item1`
[1] 1 2 3

$item2
$item2$`item2a`
[1] "a" "b" "c" "d" "e"

$item2$item3b
[1]  TRUE FALSE  TRUE  TRUE
str(mylist2)

List of 2
 $ item1: int [1:3] 1 2 3
 $ item2:List of 2
  ..$ item2a: chr [1:5] "a" "b" "c" "d" ...
  ..$ item3b: logi [1:4] TRUE FALSE TRUE TRUE
mylist2[[2]][1]

$`item2a`
[1] "a" "b" "c" "d" "e"

PENDIENTE

"a" %in% mylist2[[2]][1]

[1] FALSE
LS0tDQp0aXRsZTogIlIgRnVuZGFtZW50YWxzIg0KDQoNCm91dHB1dDogDQogIGh0bWxfbm90ZWJvb2s6IA0KICAgIHRvYzogeWVzDQogICAgdG9jX2Zsb2F0OiB0cnVlDQogICAgZmlnX2NhcHRpb246IHRydWUNCi0tLQ0KDQojIFIgZGF0YSB0eXBlcw0KQ29udmVydCBUUlVFIHRvIGFuIGludGVnZXINCmBgYHtyfQ0KYXMuaW50ZWdlcihUUlVFKQ0KYGBgDQpXaGF0IGlzIHRoZSBkYXRhdHlwZSBvZiB0aGUgdmFsdWUgcmV0dXJuZWQgYnkgU3lzLnRpbWUoKT8NCmBgYHtyfQ0KY2xhc3MoU3lzLnRpbWUoKSkNCmBgYA0KV2hhdCBpcyB0aGUgZGF0YXR5cGUgb2YgdGhlIHZhbHVlIHJldHVybmVkIGJ5IFN5cy50aW1lem9uZSgpPw0KYGBge3J9DQpjbGFzcyhTeXMudGltZXpvbmUoKSkNCmBgYA0KTWFrZSB0aGlzIHF1b3RlIGludG8gYW4gUiBzdHJpbmcNCi0gIkRvIHlvdSB0aGluayB0aGlzIGlzIGEgZ2FtZT8iLCBoZSBzYWlkLiAiTm8sIEkgdGhpbmsgSmVuZ2EncyBnYW1lIiwgQXJjaGVyIHJlc3BvbmRlZC4NCmBgYHtyfQ0KDQpgYGANCg0KIyBCYXNpYyBvcGVyYXRpb25zDQoNCmBgYHtyfQ0KcGleMg0KYGBgDQpgYGB7cn0NCnBpID4gMw0KYGBgDQpgYGB7cn0NCjUgPiAzICYgNSA8PSA2DQpgYGANCmBgYHtyfQ0KMTo1IDw9IDMNCmBgYA0KDQojIFIgb2JqZWN0cw0KDQpgYGB7cn0NCnZlY0EgPC0gMToyDQp2ZWNCIDwtIDI6Mw0KYGBgDQoNCmBgYHtyfQ0KdmVjQSAqIHZlY0INCmBgYA0KYGBge3J9DQp2ZWNBICogMw0KYGBgDQoNCmBgYHtyfQ0KdmVjQyA8LSAxOjYNCmBgYA0KDQpgYGB7cn0NCnZlY0EgKiB2ZWNDDQpgYGANCmBgYHtyfQ0KdmVjQyAqIHZlY0ENCmBgYA0KDQojIERhdGFmcmFtZXMNCg0KYGBge3J9DQpkYXRhLmZyYW1lKGEgPSAxOjIsIGIgPSBjKCJibHVlIiwgInJlZCIpKQ0KYGBgDQoNCmBgYHtyfQ0KYmFkZGYgPC0gZGF0YS5mcmFtZShhID0gMToyLCANCiAgICAgICAgICAgICAgICAgICAgYiA9ICJhIiwgImIiLCANCiAgICAgICAgICAgICAgICAgICAgcm93Lm5hbWVzID0gYygicHJpbWVybyIsICJzZWd1bmRvIikpDQpgYGANCmBgYHtyfQ0KYmFkZGYNCmBgYA0KYGBge3J9DQpnb29kZGYgPC0gZGF0YS5mcmFtZShhID0gMToyLCANCiAgICAgICAgICAgICAgICAgICAgIGIgPSBjKCJhIiwgImIiKSwgDQogICAgICAgICAgICAgICAgICAgICBJRCA9IGMoInByaW1lcm8iLCAic2VndW5kbyIpKQ0KYGBgDQpgYGB7cn0NCmdvb2RkZg0KYGBgDQpgYGB7cn0NClZpZXcoZ29vZGRmKQ0KYGBgDQpgYGB7cn0NClZpZXcoZ29vZGRmKQ0KYGBgDQpgYGB7cn0NCmRpbShpcmlzKQ0KYGBgDQpgYGB7cn0NCm5yb3coaXJpcykNCmBgYA0KYGBge3J9DQpsZW5ndGgoaXJpcykNCmBgYA0KDQpgYGB7cn0NCm5hbWVzKGlyaXMpDQpgYGANCg0KYGBge3J9DQpjb2xuYW1lcyhpcmlzKQ0KYGBgDQpgYGB7cn0NCnJvd25hbWVzKGlyaXMpDQpgYGANCiMgTGlzdHMNCg0KYGBge3J9DQpteWxpc3QgPC0gbGlzdChhID0gMTozLCANCiAgICAgICAgICAgICAgIExFVFRFUlMpDQpgYGANCmBgYHtyfQ0KbXlsaXN0DQpgYGANCmBgYHtyfQ0KbXlsaXN0W1sxXV0NCmBgYA0KDQpgYGB7cn0NCm15bGlzdFtbMl1dDQoNCmBgYA0KDQpgYGB7cn0NCm15bGlzdFtbMV1dIFszXQ0KDQpgYGANCmBgYHtyfQ0KbXlsaXN0MiA8LSBsaXN0KGl0ZW0xID0gMTozLCANCiAgICAgICAgICAgaXRlbTIgPSBsaXN0KGl0ZW0yYSA9IGxldHRlcnNbMTo1XSwgDQogICAgICAgICAgICAgICAgICAgICAgICBpdGVtM2IgPSBjKFQsIEYsIFQsIFQpKSkNCmBgYA0KDQpgYGB7cn0NCm15bGlzdDJbWzJdXVsxXQ0KYGBgDQpgYGB7cn0NCm15bGlzdDJbWzJdXSBbWzFdXSBbM10NCmBgYA0KDQpgYGB7cn0NCmhlYWQobXlsaXN0MikNCmBgYA0KYGBge3J9DQpzdHIobXlsaXN0MikNCmBgYA0KYGBge3J9DQpteWxpc3QyW1syXV1bMV0NCmBgYA0KDQoNCiMgUEVORElFTlRFDQpgYGB7cn0NCiJhIiAlaW4lIG15bGlzdDJbWzJdXVsxXSAjIGNoZXF1ZWFyIGNvbW8gc2UgaGFjZSBlc3RvDQpgYGANCg0K