From 9dfeecd729d11fd29ca4a3cb2b84cb33ac8d735a Mon Sep 17 00:00:00 2001
From: Dan Buch <daniel.buch@gmail.com>
Date: Mon, 11 Jul 2011 04:31:40 -0400
Subject: [PATCH] finished with the "R introduction" on r-tutor.com

---
 .RData     | Bin 450 -> 543 bytes
 .Rhistory  |  30 ++++++++++++++++++++++++++++++
 mydata.csv |   4 ++++
 mydata.txt |   4 ++++
 4 files changed, 38 insertions(+)
 create mode 100644 mydata.csv
 create mode 100644 mydata.txt

diff --git a/.RData b/.RData
index 0f4ce26bca4aa256ea002934d905d5814756e314..7ffebb195c9ef56f4034d62c74026b035a3faae1 100644
GIT binary patch
literal 543
zcmV+)0^t20iwFP!000001D#dPPQpMC-fasO6hnds4<0;tG$ep$Mc`yiG<f0KKY|8m
z0*G?s@q8R#K<jLoS+`3|37hQBWIOYHvoo{Xes9n$56X-&gBcZAO;9ZZ77nu{qyx*T
z*uDE^@o3v9&rn`497)G}fD?|zHhz`>RSm%231s@O6A+a+$jvl06B|sX&Lo(FUPGHI
zO7Y#Ag&z$?Z{l~8_PlW1Q1qsvw?O{tXLDgGBLK&sxo*_a6Ce+6YY9osq!}rvHc{%4
z7@Z!n*jX&?^WALZm%?ggu<|aFni8a%3r4xx0;3Zc6zL8So|OlG2$nUZ*@Q;<(E1fV
zRg`ej`l&b$mcdwbliDSQ<B;aMq<Nm^TkyutoLnW~(D4@GY!i5H=M<=yRdzllWzPP)
zFyU8%)~=IpoUt`5Q55}b3{N60tg`PcoceGEE@_2%#8@v`a_|FZ9>$K5EYD;m0#^!7
z1@&Qmf#G#_k&h_}|7C4RttquuM#>VE+@Hgh9IoVW_u>#16&=s&Di2myd9b?igOy)w
zVR0%i)|ye9Y&U^uyPW%!bU5tV@OQ~`h4?opZ_{~}07H*G^+6(w{m>0&3vKu4AskKT
z;U1?-2NmwqmA?BjSuI8ZVQ&5C&eaphV$$EqbVJIE^#<^1RrthstUcncqFoHwd+I-L
hr{DKU3q;i7k{4LwL6SqTabgjn{Q=Z|4n#Bv007g9|KR`t

literal 450
zcmV;z0X_a7iwFP!000001D#Y&PlG@ZWr0>o#E{fO4<0=?Y4xnN_T)uVFTE}wO*Iq}
zz-n*)WdDHTY?;AjOFtqBJCog+_h#M>OeeFUJ+n1U(>2|J)d1JjVPWuggypcDiQU^T
zZS#yQwC89qG<@obcK|06+ao-#09*yY+6!a^FH11arpWR&ln@I-V!jMB@Vgk}q7~<6
zn!FDre~9M>?fFSGko=+KUxEEmd-Gti5rARQObr^V0#uD#iXe?j8imxgfmW?VA5W0Q
z+Ql;J?PsIB23B(iE4xQhqXKacf{|8RVAO$5mF@vyyL1TV5ZOhVvNX~|nO8V+q;i_(
zsU3x@FcQ-wPl?Vsd7ej}?<=`2KjImsR)BNv=Sf-?esFSHG|MtOi^<8fzbUNcbzrpn
zl)F*v6PBVVzRSSVLMh7*c+UIt6jGWlCO#}>J>h?fvA2rn67jFm-Zb;90EWJEy7QXc
z)5HtYT-iN&NEUIH9MM%Xs7R03>hAM$oi9Sd-1^7$<PIFV0QxZ*UP8K<uK?e43m;gI
sc|_eV#%%y6kJG1Z`GbJGP*g2uv8B~!v3dj>BNkEGFMS~4#4iQ_0A}aaA^-pY

diff --git a/.Rhistory b/.Rhistory
index 7347a31..5771aeb 100644
--- a/.Rhistory
+++ b/.Rhistory
@@ -114,3 +114,33 @@ head(mtcars)
 q()
 s
 q()
+mtcars[[[9]]
+mtcars[[9]]
+mtcars[["am]]
+mtcars[["am"]]
+mtcars$am
+mtcars[1]
+head(mtcars[1])
+mtcars["mpg"]
+mtcars[c("mpg", "hp")]
+mtcars[c("mpg", "hp")][1]
+mtcars[c("mpg", "hp")][[1]]
+mtcars[24,]
+mtcars["Camaro Z28",]
+mtcars[c("Datsun 710", "Camaro Z28")]
+mtcars[c("Datsun 710", "Camaro Z28",)]
+mtcars[c("Datsun 710", "Camaro Z28"),]
+L = mtcars$am == 0
+L
+mtcars[L,]
+mtcars[L,]
+mtcars[L,]$mpg
+library(gdata)
+library(foreign)
+help(read.mtp)
+mydata = read.table("mydata.txt")
+mydata
+mydata = read.csv("mydata.csv")
+mydata
+getwd()
+q()
diff --git a/mydata.csv b/mydata.csv
new file mode 100644
index 0000000..05ab2ef
--- /dev/null
+++ b/mydata.csv
@@ -0,0 +1,4 @@
+Col1,Col2,Col3
+100,a1,b1
+200,a2,b2
+300,a3,b3
diff --git a/mydata.txt b/mydata.txt
new file mode 100644
index 0000000..018793a
--- /dev/null
+++ b/mydata.txt
@@ -0,0 +1,4 @@
+100    a1    b1
+200    a2    b2
+300    a3    b3
+400    a4    b4