From 28e935eda2ce7df6e190bdfaf8faaf90ad0d353d Mon Sep 17 00:00:00 2001 From: elliot <57014501+elliotcodes@users.noreply.github.com> Date: Mon, 25 Oct 2021 09:15:30 -0700 Subject: [PATCH 1/6] Updated bug report template --- .github/ISSUE_TEMPLATE/bug-report--------.md | 38 ++++++++++++++++++++ 1 file changed, 38 insertions(+) create mode 100644 .github/ISSUE_TEMPLATE/bug-report--------.md diff --git a/.github/ISSUE_TEMPLATE/bug-report--------.md b/.github/ISSUE_TEMPLATE/bug-report--------.md new file mode 100644 index 0000000..1077d7f --- /dev/null +++ b/.github/ISSUE_TEMPLATE/bug-report--------.md @@ -0,0 +1,38 @@ +--- +name: "Bug Report \U0001F575\U0001F3FC‍♀️" +about: "Create a report to let me know about bugs \U0001F41B" +title: "Bug Report \U0001F575\U0001F3FC‍♀️" +labels: '' +assignees: '' + +--- + +**Describe the bug** +A clear and concise description of what the bug is. + +**To Reproduce** +Steps to reproduce the behavior: +1. Go to '...' +2. Click on '....' +3. Scroll down to '....' +4. See error + +**Expected behavior** +A clear and concise description of what you expected to happen. + +**Screenshots** +If applicable, add screenshots to help explain your problem. + +**Desktop (please complete the following information):** + - OS: [e.g. iOS] + - Browser [e.g. chrome, safari] + - Version [e.g. 22] + +**Smartphone (please complete the following information):** + - Device: [e.g. iPhone6] + - OS: [e.g. iOS8.1] + - Browser [e.g. stock browser, safari] + - Version [e.g. 22] + +**Additional context** +Add any other context about the problem here. From 46158598d9cc1985347376f21c6888d5b3c26879 Mon Sep 17 00:00:00 2001 From: elliotcodes Date: Mon, 25 Oct 2021 09:46:02 -0700 Subject: [PATCH 2/6] New .R file to be added --- Homework2PartB_ElliotTruslow.R | 162 +++++++++++++++++++++++++++++++++ 1 file changed, 162 insertions(+) create mode 100644 Homework2PartB_ElliotTruslow.R diff --git a/Homework2PartB_ElliotTruslow.R b/Homework2PartB_ElliotTruslow.R new file mode 100644 index 0000000..21a378c --- /dev/null +++ b/Homework2PartB_ElliotTruslow.R @@ -0,0 +1,162 @@ +#Part 1B +#Code for Assignment + +#setting directory to run code from repo without errors +setwd("~/Desktop/Homework/Intro/") +getwd() + +# NOTE: removed 2 lines that were throwing errors in the starting code. + +## |---------| Part B |---------| +### 01-Reshape.R +## 01-Structures.R +# Code from 01-structures + +5 + 5 +4 - 1 +1 * 2 +4 ^ 2 + +a <- 1 +b <- 2 +a + b +A <- 3 +a + b - A + +round(3.1415) +factorial(3) +sqrt(9) + +factorial(round(2.0015) + 1) + +# Your Turn +# --------- +10 + 2 +12 * 3 +36 - 6 +30 / 3 +# --------- + +# R objects + +foo <- 42 + +foo <- round(3.1415) + 1 +foo +factorial(foo) + +foo +rm(foo) +foo + +pi +pi <- 1 +pi +rm(pi) +pi + +# Data structures + +# Warm up +# --------- +WorldPhones +# --------- + +vec <- c(1, 2, 3, 10, 100) +vec + +mat <- matrix(c(1, 2, 3, 4, 5, 6), nrow = 2) +mat + +matrix(c(1, 2, 3, 4, 5, 6), nrow = 2) +matrix(c(1, 2, 3, 4, 5, 6), nrow = 3) + +vec + 4 +vec * 4 +vec * vec # element-wise multiplication + +vec %*% vec # matrix multiplication (inner) +vec %o% vec # matrix multiplication (outer) + +mat +t(mat) # transpose + +array(c(1, 2, 3, 4, 5, 6), dim = c(2, 2, 3)) + +# Data types + +1 + 1 +3000000 +class(0.00001) + +"hello" +class("hello") + +"hello world" +nchar("hello") +paste("hello", "world") + +# Warm up +# --------- +1 +"1" +"one" +# --------- + +3 > 4 +class(TRUE) +class(T) + +fac <- factor(c("a", "b", "c")) +fac +class(fac) + +# Quiz +# --------------------- +x <- c(1, 2, 3) +x +"x" +# --------------------- + +# Your Turn +# --------------------- +vec <- c(1, "R", TRUE) +class(vec) +vec +# --------------------- + +# Quiz +# --------- +c(5, "two") +c(TRUE, "a") +c(1, "TRUE") +TRUE + 5 +# --------- + +as.numeric("1") +as.character(TRUE) + +lst <- list(1, "R", TRUE) +class(lst) + +list(c(1, 2), TRUE, c("a", "b", "c")) + +df <- data.frame(c(1, 2, 3), + c("R","S","T"), c(TRUE, FALSE, TRUE)) +class(df) + +nvec <- c(one = 1, two = 2, three = 3) +nvec + +nlst <- list(one = 1, two = 2, many = c(3, 4, 5)) +nlst + +ndf <- data.frame(numbers = c(1, 2, 3), + letters = c("R","S","T"), + logic = c(TRUE, FALSE, TRUE)) +ndf + +names(ndf) +names(nvec) +names(nvec) <- c("uno", "dos", "tres") +nvec From 179029ece62002d99a4760e56e1d230c75003384 Mon Sep 17 00:00:00 2001 From: elliotcodes Date: Mon, 25 Oct 2021 10:34:30 -0700 Subject: [PATCH 3/6] Catching up dev<>main --- .DS_Store | Bin 0 -> 6148 bytes Intro | 1 + data/tidy.csv | 1 + data/tidy.csv.bz2 | Bin 0 -> 43 bytes data/tidy.rds | Bin 0 -> 1283 bytes 5 files changed, 2 insertions(+) create mode 100644 .DS_Store create mode 160000 Intro create mode 100644 data/tidy.csv create mode 100644 data/tidy.csv.bz2 create mode 100644 data/tidy.rds diff --git a/.DS_Store b/.DS_Store new file mode 100644 index 0000000000000000000000000000000000000000..a57cd75652d5d338ba57a9d2cfbee1d7f89c5db4 GIT binary patch literal 6148 zcmeHK&2G~`5S~rlb{&Ms0f}CaeBl;VNokRKKypKR$N>pq1P4H^T}RZC>#bsk2tttW zJOR7}&%qP$ES%t*-6bL}?GYi^k!HWy`B`f}Te}`25`$^lC+ZN9gfg~#48IYMvtE#v z^=twKuQAHiNs_Asb6(KN-_HQQJC9CCQA*>+`#V5v`@0ss5f3>rRTMY!K3|rX%*u27 zJ$y;d^Q^3Ty|1FR=B;mRO4*j}>+P4(shUMqTusYCJbBKuM{#wUSo?`m`O=P)r`dRR z)VcXU6;+%Sb_w^;b{)}8+S(ec@vxAS+4_aF6EN#KLla>L?J_yl7~#Or8MY%CIzaj8qGbZ2Qd<$-uxE$iN^V0HhTd49@UW%_uBa32x=&$lq{u0s!np3)cVu literal 0 HcmV?d00001 diff --git a/data/tidy.rds b/data/tidy.rds new file mode 100644 index 0000000000000000000000000000000000000000..0d3604048fe2a4d898fb976a0dd3941aaf25f0bb GIT binary patch literal 1283 zcmV+e1^oISiwFP!000001MOMeZ`(EyKiQV8IC0}*$@Z`&@q)C)x<=c8VJP-6U})E( z7`DB1z<~Bev*|>gOc|1#IM_@6=k#Um5Ra6O){&7ECrGz!hycPA?}Nv?pN>cR*ERsu zpap1+VA>s@tyr1|XH@I8wk1W{_2L}6x+6-=q zaMOJjg_E%%3kKJ!TE$~82)^eB#3OG_g*@cxilCkO?~F40zzZf!cd#`xnCht>#5XAXoN$WXI}HvIq@S`=dB_bw45^N$R^{N`<>%bc)@JPz_m zy%Kp6ja#T&$}FKCHIIe;4(Y4$RVXR5{(!|0S@VYmr&Yq)@?)1z0t$8M6pBtYPQ>rc z4D~gge&3|mOQ!F5{OHMK9Qb`NVFTTWyB9U0QMSfIFXBGmGuX?@UuTac37aO=h4SeV zp0DC?#Cmgd_6GAceABxd_jY%`CB&b8e$ku6+Vb8&dH%7-UYsz4xmCt|xbOG(4Q8i= zxjk6K)zsy4pNK6!@WwGK@P+m89O3359C{)^0qHG)O*+ToNT}`yBnY}-xMU_*ckIFYtzLmZ2URK`8-d!rcNW7gZ zjJML`pq`57TIlUU!KW@3{W+~bSI(dGN*4E?D&6!Wqe)4u?~57aAW-w~ Date: Mon, 25 Oct 2021 11:43:20 -0700 Subject: [PATCH 4/6] Adding revised code for HW2 EC --- .DS_Store | Bin 6148 -> 8196 bytes 01-Reshape_RevisedELT.R | 78 ++++++++++++++++++++++++++++++++++++++++ tidy.csv | 17 +++++++++ tidy.csv.bz2 | Bin 0 -> 206 bytes tidy.rds | Bin 0 -> 302 bytes 5 files changed, 95 insertions(+) create mode 100644 01-Reshape_RevisedELT.R create mode 100644 tidy.csv create mode 100644 tidy.csv.bz2 create mode 100644 tidy.rds diff --git a/.DS_Store b/.DS_Store index a57cd75652d5d338ba57a9d2cfbee1d7f89c5db4..47c597d5c69a6a7ace14c9e3d90efc41468d1b64 100644 GIT binary patch literal 8196 zcmeHMO-~a+7=8x|Y*AwmByiE}#gj*gNZ-FlfS^<;z^(Ru$e9rZ(v}inR({peRg)Ad3UC7OGK>N4@yKUMC2d~EL=nJ zmn6nTK9y#4&k~S9wwaKF{YBpH~tO8a6tAJI&D)2ulfHPYp=Zte-joQ*GU=_HM z3W)u|MHX1mI94dP4iqv30Orsw6Y7WqB*)cQ(KuEpsko+!9+;*w9bzy=$G9uZffbEo zg^Es0(TVAqnT}AHoE5xXx_kxF!rcBkU^hHM{Eh?u@b0d3JU z+M_kv-Hv$EkGKzJ;a4W1FGo${uy2`m=zoN~rp!?@?EFEmtFQOn??z!SEf#;Unc3Xj z{DR{wI*T_J-_+ZDP*1(I->Z7bE798V(zdVbdz?p;y63+LTZ2Yn=`oK}FN|A>B!@u@ zCa+(Hali*v-j9QxyiQ#WI8NTlHwr7m;l^fp)!itqk5=8`X1TcPuHSz!8s(kkJEe!) z`<>&H;oH%>Px29n>D`EKs`jM(Y(C&oJ&7Y8AD~az=OB(pDR~)zzG7@zAZ>Sf1=0_g z5$HBOg$H%ubpv2Rhg7B=NR~jfDmCDV5k4WtQg~!SeRybu)*$PhIG=>*rl@nYO)+>0 z@oD+lt+OpJ>jD^JLi-;kBB6Ma4P$xNwZ5uO$ zU{CQgE|ACOvxP0AM$dt3aE2hWT<^g*7j|AcK`1sJ>Sb(yW^5fefUrEqm7CxlP20<@ z>Wi^eUC-Ks=hF$5Gd%GIn>=%#1oLI@OSqhAkETslf%8&eR!y`b;{UC)fB!$P+p+Ul z1*`%Wpa9F&>a{8+{_|}%dk-Skc9HjyMG|&ng_43ohT}jPjsquu7^3dNRB$R9#|qJd UbP+!UnCG%R|K&2+;)*Ho8$*Jwp8x;= delta 149 zcmZp1XfcprU|?W$DortDU=RQ@Ie-{MGjUEV6q~50D9R3!2Z?#+TPsFo+VcUSt_55)y54tFgAI?}`msQRM_`0j$7s_k@y4 zfH#;Ps0NwlF7f+ufWCbCFB+iwFP!000001B>8dU|?WoU}0orU}gm}8CXL@+;lB~V!|K}5DS1Y3j-%e zpj(zX-_s2gESv zmVpdpK!90LIVfOk1`?4#tPI40KsU?-r%eQanPUmWJ<#L{@(Ldi2LLfQRE;+f`#{+s zxdT8ff-nZv`FV-CsW9iWqWTG%_7cr#Q*>QKY&6I0PFKa0Hgx|0Gzjc A^#A|> literal 0 HcmV?d00001 From 98aca56c4fe45222d82a426b20f9476974015eec Mon Sep 17 00:00:00 2001 From: elliotcodes Date: Mon, 25 Oct 2021 11:46:55 -0700 Subject: [PATCH 5/6] Merging dev:main --- tidy.csv | 17 ----------------- tidy.csv.bz2 | Bin 206 -> 0 bytes tidy.rds | Bin 302 -> 0 bytes 3 files changed, 17 deletions(-) delete mode 100644 tidy.csv delete mode 100644 tidy.csv.bz2 delete mode 100644 tidy.rds diff --git a/tidy.csv b/tidy.csv deleted file mode 100644 index af5b1c1..0000000 --- a/tidy.csv +++ /dev/null @@ -1,17 +0,0 @@ -"class","age","gender","perished","survived" -"1st","adult","male",118,57 -"1st","adult","female",4,140 -"1st","child","male",0,5 -"1st","child","female",0,1 -"2nd","adult","male",154,14 -"2nd","adult","female",13,80 -"2nd","child","male",0,11 -"2nd","child","female",0,13 -"3rd","adult","male",387,75 -"3rd","adult","female",89,76 -"3rd","child","male",35,13 -"3rd","child","female",17,14 -"Crew","adult","male",670,192 -"Crew","adult","female",3,20 -"Crew","child","male",0,0 -"Crew","child","female",0,0 diff --git a/tidy.csv.bz2 b/tidy.csv.bz2 deleted file mode 100644 index fb05be8c9945965ae98b9232bab71395fc367a3b..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 206 zcmV;<05ShUT4*^jL0KkKSu$hvFaQ8E-GBfP5CnhV2mmkVUw|+G*2pC^)Fz+@s5H|+ z8lF;UdPaZ%Xa!XDDWT~!G5{JhifA=KJ%nRS9f101kfvVniXakQqH+X@twD%oK_w_+ zP`wn1IM)oNS7TDVrnsxMZ_N>sFo+VcUSt_55)y54tFgAI?}`msQRM_`0j$7s_k@y4 zfH#;Ps0NwlF7f+ufWCbCFB+iwFP!000001B>8dU|?WoU}0orU}gm}8CXL@+;lB~V!|K}5DS1Y3j-%e zpj(zX-_s2gESv zmVpdpK!90LIVfOk1`?4#tPI40KsU?-r%eQanPUmWJ<#L{@(Ldi2LLfQRE;+f`#{+s zxdT8ff-nZv`FV-CsW9iWqWTG%_7cr#Q*>QKY&6I0PFKa0Hgx|0Gzjc A^#A|> From 3778de07ef386dfa82eaac6af302f47a6ea30107 Mon Sep 17 00:00:00 2001 From: elliot <57014501+elliotcodes@users.noreply.github.com> Date: Mon, 25 Oct 2021 14:31:39 -0700 Subject: [PATCH 6/6] Revert "Jmp243 clone dev" --- .DS_Store | Bin 8196 -> 0 bytes .github/ISSUE_TEMPLATE/bug-report--------.md | 38 ----- 01-Reshape_RevisedELT.R | 78 --------- Homework2PartB_ElliotTruslow.R | 162 ------------------- Intro | 1 - data/tidy.csv | 1 - data/tidy.csv.bz2 | Bin 43 -> 0 bytes data/tidy.rds | Bin 1283 -> 0 bytes 8 files changed, 280 deletions(-) delete mode 100644 .DS_Store delete mode 100644 .github/ISSUE_TEMPLATE/bug-report--------.md delete mode 100644 01-Reshape_RevisedELT.R delete mode 100644 Homework2PartB_ElliotTruslow.R delete mode 160000 Intro delete mode 100644 data/tidy.csv delete mode 100644 data/tidy.csv.bz2 delete mode 100644 data/tidy.rds diff --git a/.DS_Store b/.DS_Store deleted file mode 100644 index 47c597d5c69a6a7ace14c9e3d90efc41468d1b64..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 8196 zcmeHMO-~a+7=8x|Y*AwmByiE}#gj*gNZ-FlfS^<;z^(Ru$e9rZ(v}inR({peRg)Ad3UC7OGK>N4@yKUMC2d~EL=nJ zmn6nTK9y#4&k~S9wwaKF{YBpH~tO8a6tAJI&D)2ulfHPYp=Zte-joQ*GU=_HM z3W)u|MHX1mI94dP4iqv30Orsw6Y7WqB*)cQ(KuEpsko+!9+;*w9bzy=$G9uZffbEo zg^Es0(TVAqnT}AHoE5xXx_kxF!rcBkU^hHM{Eh?u@b0d3JU z+M_kv-Hv$EkGKzJ;a4W1FGo${uy2`m=zoN~rp!?@?EFEmtFQOn??z!SEf#;Unc3Xj z{DR{wI*T_J-_+ZDP*1(I->Z7bE798V(zdVbdz?p;y63+LTZ2Yn=`oK}FN|A>B!@u@ zCa+(Hali*v-j9QxyiQ#WI8NTlHwr7m;l^fp)!itqk5=8`X1TcPuHSz!8s(kkJEe!) z`<>&H;oH%>Px29n>D`EKs`jM(Y(C&oJ&7Y8AD~az=OB(pDR~)zzG7@zAZ>Sf1=0_g z5$HBOg$H%ubpv2Rhg7B=NR~jfDmCDV5k4WtQg~!SeRybu)*$PhIG=>*rl@nYO)+>0 z@oD+lt+OpJ>jD^JLi-;kBB6Ma4P$xNwZ5uO$ zU{CQgE|ACOvxP0AM$dt3aE2hWT<^g*7j|AcK`1sJ>Sb(yW^5fefUrEqm7CxlP20<@ z>Wi^eUC-Ks=hF$5Gd%GIn>=%#1oLI@OSqhAkETslf%8&eR!y`b;{UC)fB!$P+p+Ul z1*`%Wpa9F&>a{8+{_|}%dk-Skc9HjyMG|&ng_43ohT}jPjsquu7^3dNRB$R9#|qJd UbP+!UnCG%R|K&2+;)*Ho8$*Jwp8x;= diff --git a/.github/ISSUE_TEMPLATE/bug-report--------.md b/.github/ISSUE_TEMPLATE/bug-report--------.md deleted file mode 100644 index 1077d7f..0000000 --- a/.github/ISSUE_TEMPLATE/bug-report--------.md +++ /dev/null @@ -1,38 +0,0 @@ ---- -name: "Bug Report \U0001F575\U0001F3FC‍♀️" -about: "Create a report to let me know about bugs \U0001F41B" -title: "Bug Report \U0001F575\U0001F3FC‍♀️" -labels: '' -assignees: '' - ---- - -**Describe the bug** -A clear and concise description of what the bug is. - -**To Reproduce** -Steps to reproduce the behavior: -1. Go to '...' -2. Click on '....' -3. Scroll down to '....' -4. See error - -**Expected behavior** -A clear and concise description of what you expected to happen. - -**Screenshots** -If applicable, add screenshots to help explain your problem. - -**Desktop (please complete the following information):** - - OS: [e.g. iOS] - - Browser [e.g. chrome, safari] - - Version [e.g. 22] - -**Smartphone (please complete the following information):** - - Device: [e.g. iPhone6] - - OS: [e.g. iOS8.1] - - Browser [e.g. stock browser, safari] - - Version [e.g. 22] - -**Additional context** -Add any other context about the problem here. diff --git a/01-Reshape_RevisedELT.R b/01-Reshape_RevisedELT.R deleted file mode 100644 index ccbcd16..0000000 --- a/01-Reshape_RevisedELT.R +++ /dev/null @@ -1,78 +0,0 @@ -### 01-Reshape.R -# install.packages("reshape2") -# library(reshape2) - -## Tidy data - -# Values in column names - -raw <- read.csv("data/pew.csv", check.names = F) - -head(raw) - -library(reshape2) -tidy <- melt(raw, id = "religion") - -head(raw) -head(tidy) - -names(tidy) <- c("religion", "income", "n") -tidy <- melt(raw, id = "religion", - variable.name = "income", value.name = "n") - -# Variable names in cells - -raw <- read.delim("data/weather.txt", check.names = F, na.strings = ".") - -# Your Turn -# ------------------------------------------ -raw <- melt(raw, - id = c("year", "month", "element"), - variable.name = "day", na.rm = TRUE) -raw$day <- as.numeric(as.character(raw$day)) -raw <- raw[, c("year", "month", "day", "element", "value")] -# ------------------------------------------ - -head(raw) - -tidy <- dcast(raw, year + month + day ~ element, - value.var = "value") - -tidy <- dcast(raw, ... ~ element, value.var = "value") - -titanic2 <- read.csv("data/titanic2.csv", - stringsAsFactors = FALSE) - -head(titanic2) - -# Your Turn -# ------------------------------------------ -tidy <- melt(titanic2, id = c("class", "age", "fate"), - variable.name = "gender") -head(tidy) -tidy <- dcast(tidy, class + age + gender ~ fate, - value.var = "value") -head(tidy) -titanic$rate <- round(titanic$survived / - (titanic$survived + titanic$perished), 2) -head(tidy) -# ------------------------------------------ - -# Data split across many files - -df1 <- data.frame(color = "white", value = c(3, 4)) -df2 <- data.frame(color = "blue", value = c(3, 4, 5)) -rbind(df1, df2) - -df1 <- data.frame(color = "white", value = c(1, 2, 3)) -df2 <- data.frame(x = c("a", "b", "c"), n = c(3, 4, 5)) -cbind(df1, df2) - -# Saving Data - -write.csv(tidy, file = "tidy.csv", row.names = FALSE) -saveRDS(tidy, "tidy.rds") -tidy2 <- readRDS("tidy.rds") - -write.csv(tidy, file = bzfile("tidy.csv.bz2"), row.names = FALSE) -tidy3 <- read.csv("tidy.csv.bz2") \ No newline at end of file diff --git a/Homework2PartB_ElliotTruslow.R b/Homework2PartB_ElliotTruslow.R deleted file mode 100644 index 21a378c..0000000 --- a/Homework2PartB_ElliotTruslow.R +++ /dev/null @@ -1,162 +0,0 @@ -#Part 1B -#Code for Assignment - -#setting directory to run code from repo without errors -setwd("~/Desktop/Homework/Intro/") -getwd() - -# NOTE: removed 2 lines that were throwing errors in the starting code. - -## |---------| Part B |---------| -### 01-Reshape.R -## 01-Structures.R -# Code from 01-structures - -5 + 5 -4 - 1 -1 * 2 -4 ^ 2 - -a <- 1 -b <- 2 -a + b -A <- 3 -a + b - A - -round(3.1415) -factorial(3) -sqrt(9) - -factorial(round(2.0015) + 1) - -# Your Turn -# --------- -10 + 2 -12 * 3 -36 - 6 -30 / 3 -# --------- - -# R objects - -foo <- 42 - -foo <- round(3.1415) + 1 -foo -factorial(foo) - -foo -rm(foo) -foo - -pi -pi <- 1 -pi -rm(pi) -pi - -# Data structures - -# Warm up -# --------- -WorldPhones -# --------- - -vec <- c(1, 2, 3, 10, 100) -vec - -mat <- matrix(c(1, 2, 3, 4, 5, 6), nrow = 2) -mat - -matrix(c(1, 2, 3, 4, 5, 6), nrow = 2) -matrix(c(1, 2, 3, 4, 5, 6), nrow = 3) - -vec + 4 -vec * 4 -vec * vec # element-wise multiplication - -vec %*% vec # matrix multiplication (inner) -vec %o% vec # matrix multiplication (outer) - -mat -t(mat) # transpose - -array(c(1, 2, 3, 4, 5, 6), dim = c(2, 2, 3)) - -# Data types - -1 + 1 -3000000 -class(0.00001) - -"hello" -class("hello") - -"hello world" -nchar("hello") -paste("hello", "world") - -# Warm up -# --------- -1 -"1" -"one" -# --------- - -3 > 4 -class(TRUE) -class(T) - -fac <- factor(c("a", "b", "c")) -fac -class(fac) - -# Quiz -# --------------------- -x <- c(1, 2, 3) -x -"x" -# --------------------- - -# Your Turn -# --------------------- -vec <- c(1, "R", TRUE) -class(vec) -vec -# --------------------- - -# Quiz -# --------- -c(5, "two") -c(TRUE, "a") -c(1, "TRUE") -TRUE + 5 -# --------- - -as.numeric("1") -as.character(TRUE) - -lst <- list(1, "R", TRUE) -class(lst) - -list(c(1, 2), TRUE, c("a", "b", "c")) - -df <- data.frame(c(1, 2, 3), - c("R","S","T"), c(TRUE, FALSE, TRUE)) -class(df) - -nvec <- c(one = 1, two = 2, three = 3) -nvec - -nlst <- list(one = 1, two = 2, many = c(3, 4, 5)) -nlst - -ndf <- data.frame(numbers = c(1, 2, 3), - letters = c("R","S","T"), - logic = c(TRUE, FALSE, TRUE)) -ndf - -names(ndf) -names(nvec) -names(nvec) <- c("uno", "dos", "tres") -nvec diff --git a/Intro b/Intro deleted file mode 160000 index 23fac21..0000000 --- a/Intro +++ /dev/null @@ -1 +0,0 @@ -Subproject commit 23fac218ec796e440fac5e8fada230989b10ed32 diff --git a/data/tidy.csv b/data/tidy.csv deleted file mode 100644 index 4c3db2a..0000000 --- a/data/tidy.csv +++ /dev/null @@ -1 +0,0 @@ -"n" diff --git a/data/tidy.csv.bz2 b/data/tidy.csv.bz2 deleted file mode 100644 index 94ca92ea62b9b4f4d89e718c558a7cd24bad3b81..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 43 xcmZ>Y%CIzaj8qGbZ2Qd<$-uxE$iN^V0HhTd49@UW%_uBa32x=&$lq{u0s!np3)cVu diff --git a/data/tidy.rds b/data/tidy.rds deleted file mode 100644 index 0d3604048fe2a4d898fb976a0dd3941aaf25f0bb..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 1283 zcmV+e1^oISiwFP!000001MOMeZ`(EyKiQV8IC0}*$@Z`&@q)C)x<=c8VJP-6U})E( z7`DB1z<~Bev*|>gOc|1#IM_@6=k#Um5Ra6O){&7ECrGz!hycPA?}Nv?pN>cR*ERsu zpap1+VA>s@tyr1|XH@I8wk1W{_2L}6x+6-=q zaMOJjg_E%%3kKJ!TE$~82)^eB#3OG_g*@cxilCkO?~F40zzZf!cd#`xnCht>#5XAXoN$WXI}HvIq@S`=dB_bw45^N$R^{N`<>%bc)@JPz_m zy%Kp6ja#T&$}FKCHIIe;4(Y4$RVXR5{(!|0S@VYmr&Yq)@?)1z0t$8M6pBtYPQ>rc z4D~gge&3|mOQ!F5{OHMK9Qb`NVFTTWyB9U0QMSfIFXBGmGuX?@UuTac37aO=h4SeV zp0DC?#Cmgd_6GAceABxd_jY%`CB&b8e$ku6+Vb8&dH%7-UYsz4xmCt|xbOG(4Q8i= zxjk6K)zsy4pNK6!@WwGK@P+m89O3359C{)^0qHG)O*+ToNT}`yBnY}-xMU_*ckIFYtzLmZ2URK`8-d!rcNW7gZ zjJML`pq`57TIlUU!KW@3{W+~bSI(dGN*4E?D&6!Wqe)4u?~57aAW-w~