<?xml version="1.0" encoding="shift_jis"?> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd"> <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="ja"> <head> <title>Rg0n0000n0eQQRh000000</title> <meta http-equiv="Content-Type" content="text/html;charset=shift_jis" /> <link rel="stylesheet" type="text/css" href="style.css" media="all" /> </head> <body> <div id="container"> <h1>[# ]0000000k000000㉐g0000000,{2V</h1> <h2>Rg0n0000n0eQQRh000000</h2> <div class="text"> <p> 0 000㉐g0000000LF0_00k0o00~0Z00000000k00~0j0Q00p0j00j0D00R g0o00[pe (numeric)0 }pe (complex)0eW[ (character)0֊t (logical) $Pj0i0n0000000000LR0MR000000000000j0i0n0b__g0qbF0S0h0L0g0M000<br /> 0 R g0o0000000k00c0f0vceQRY00elh00R Yn00000K00 R k000elL0B000 </p> <h3>1vceQR</h3> <h4>1.100000</h4> <p> 0 hn00F0j000000eQRY00S0h00Oh0W0f0fY000 </p> <div class="table" align="center"> <caption>h10girn0X Nn0rRT(XSMOo0%)</caption> <table style="width:360px"> <tr> <th>Cherry</th> <th>Apple</th> <th>Grape</th> <th>Banana</th> <th>Other</th> </tr> <tr> <td>15</td> <td>20</td> <td>25</td> <td>10</td> <td>30</td> </tr> </table> </div> <p> 0 R 0wRW00R n000000k0 </p> <div class="code"> > sales<- c(15,20,25,10,30)<br/> </div> <p> 0eQRW00[Enter] 000bY0h00sales k0NLn000015,20,25,10,30L0eQRU0000S0S0n0 sales o0000000n0 TMRg00Nn0000000h0:S%RSj0eW[Rg0B00p00i0n00F0j0eW[Rk0W0f00K0~00j0D00OH0p00 0hanbai 00 0X 0h0Y00S0h00g0M0000000000n0 ">" o09eLY00_0s0k0Rvk0s000000000n0YSg0B00n0g00eQRY00_o0j0D00<br /> 0 0000000n0 c() o00000~0h000peh0|Tv00n0O)Rn0_00N Nk0o08Nb'_0weuY000pe c 0(uD0f00000eQRY000eQRn0000o0XSMOT0h0k0JS҉n0000 0, 0g0:SR00JS҉n0 NI{S 0< 0h00000 0- 00d0j0D0`0 0<- 0n0]tPo0000000n0 TMR StPo0N$P (assignment) Y00Q[g0B000R g0O(uSj0D0O0d0K0n0N$Pn0f_0N Nk0:yY00S000n0puj00hb__n0N$P_jo0I{Og0B000 </p> <div class="code"> > sales<- c(15,20,25,10,30)<br/> > sales= c(15,20,25,10,30)<br/> > assign("sales",c(15,20,25,10,30))<br/> > c(15,20,25,10,30) -> sales <br/> </div> <p> 0 S0n00F0j01L0B00D0o01Rn000000000h0|Ts00Ln04XTo0L00000Rn04XTo0R0000h0|Tv00<br /> 0 0000 sales o05d0n00000Nd0n0000000h0W0f0~0h00f0D000S0n04XT00000 sales n0wU0o05g0B000R g0o00000n0wU000pe length 0(uD0f0Bl00S0h0L0g0M000<br/> </p> <div class="code"> > length(sales)<br/> [1] 5 <br /> </div> <p> 0 #}Y006qpe0eQRY00k0o00 0Y~00$P:B}00$P 0n0f_g00000eQRY00S0h00Sg0B000OH0p001K0010~0g0n06qpe0 y k0N$PY00n0k0o00y <- 1:10 B00D0o0 y <- c(1:10) n00F0k0fO00<br/> 0 eW[Rn0eQRo00eW[R0JS҉n0" "g0V00eW[Rn0000o0L0Rn0 TMR0000h0W0f00O0(uD00000OH0p00h1n0girn0.z^n00000o0!kn00F0k0\ObY00S0h0L0g0M000 </p> <div class="code"> > fruits<- c("Cherry","Apple","Grape","Banana","Other")<br/> </div> <p> 0 eW[R0000h0pe$P0000n0wU0L0 TX0g0B004XT0eW[00000pe$P0000n0 }n0 TMRh0W0f0NQ0RH00S0h0L0g0M000OH0p00eQRW0_0pe$P0000 sales h0eW[0000 fruits n0wU0o0 TX0g0B000fruits 0 sales n0000k0W0_0D0h0M0k0o00pe names 0!kn00F0k0(uD000<br/> </p> <div class="code table"> > names(sales)<- fruits <br /> > sales <br /> <br /> <table style="width:300px"> <tr> <td>Cherry</td> <td>Apple</td> <td>Grape</td> <td>Banana</td> <td>Other</td> </tr> <tr> <td>15</td> <td>20</td> <td>25</td> <td>10</td> <td>30</td> </tr> </table></div> </div> <h4>1.20LR</h4> <div class="text"> <p> 0 wU0L0 TX0g0B00pen000000Nd0n0000000h0W0f0~0h00_0LRn00000000LR (matrix0000000) h0|Tv00<br/> 0 LRn0\Obh0eQRn0Kbo00~0Z0LRn00000[W00!kk0LRn0 }0L%R0B00D0o0R%Rk00000n04XTh0 TX0n00F0k0eQRY000OH0p00h2n00F0j0000L0B00h0Y000 </p> <div class="table" align="center"> <table style="width:360px"> <caption>h20girn0X Nn0rRT(XSMOo0%)</caption> <tr> <th style="width:35px"></td> <th>Cherry</th> <th>Apple</th> <th>Grape</th> <th>Banana</th> <th>Other</th> </tr> <tr> <th>A</th> <td>15</td> <td>20</td> <td>25</td> <td>10</td> <td>30</td> </tr> <tr> <th>B</th> <td>10</td> <td>25</td> <td>20</td> <td>25</td> <td>20</td> </tr> </table> </div> <p> 0 h2n0000o02L5Rg0B00n0g00~0Z02L5Rn0LR0[Y000 </p> <div class="code"> > sales2< -matrix(0,2,5)<br/> </div> <p> 0 sales2 o0000000n0 TMR0matrix o0LR0\ObY00peg00_pe0o0LRn0 }L0Y0y0f000g002o0Ln0pe05o0Rn0peg0B000d0~000sales2 o0T }L000g0B002L5Rn0LRg0B000<br /> 0 sales2 x0n0000n0eQRo0LXSMO0B00D0o0RXSMOg0g0M000,{1Lk000015,20,25,10,300eQRW0_0D0h0M0k0o000000n04XTh0 TX0O0!kn00F0k0eQRY000 </p> <div class="code"> > sales2[1,]<- c(15,20,25,10,30)<br/> </div> <p> 0 S0S0n0[1,]o0LRn0,{1L0cY000c0f0,{2Ln04XTo0[2,]h0j000,{1Rn04XTo0[,1]0,{2Rn04XTo0[,2]g0c[Y000,{1Lh0 TX0O0,{2Lk00000eQRY000 </p> <div class="code table"> > sales2[2,]<- c(10,25,20,25,20) <br /> > sales2 <br /> <br /> <table style="width:300px"> <tr> <td></td> <td>[,1]</td> <td>[,2]</td> <td>[,3]</td> <td>[,4]</td> <td>[,5]</td> </tr> <tr> <td>[1,]</td> <td>15</td> <td>20</td> <td>25</td> <td>10</td> <td>30</td> </tr> <tr> <td>[2,]</td> <td>10</td> <td>25</td> <td>20</td> <td>25</td> <td>20</td> </tr> </table> </div> <p> 0 LRL0UOLUORk000ibU00f0D00K0h0D0F0000k0d0D0f0o0pe dim 0(uD0f0Bl00S0h0L0Sg0B000 </p> <div class="code"> > dim(sales2) <br /> [1] 25 <br /> </div> <p> 0 LRn0-Nn0000o0LjuSh0Rn0juS (mW[) g0SgqY00S0h0L0g0M000OH0p00sales2 n0,{2L03Rn0 }o00sales2[2,3] g0|Ts0QY0S0h0L0Sg0B000 </p> <div class="code"> > sales2[2,3]<br /> [1] 20 <br/> </div> <p> 0 ,{2L03Rn0 }20030k0nM0cH00n0k0o0!kn00F0k0LF00<br/> </p> <div class="code"> > sales2[2,3]<-30 <br/> </div> <p> 0 pe rownames0colnames 0(uD0f0L0Rk0 TMR0RH00S0h0L0g0M000Oh0W0f00eQRW0_0h2n0000 sales2 k0L0Rn0 TMR0NQ00S0h0k0Y000girn0.z^k0Y00eW[Rn00000o0Y0g0k0 fruits h0W0f0\ObW0f0D00n0g00]000(uD000 </p> <div class="code table"> > colnames(sales2)<-fruits <br /> > rownames(sales2)<-c("A","B") <br /> > sales2 <br/> <br /> <table style="width:300px"> <tr> <td></td> <td>Cherry</td> <td>Apple</td> <td>Grape</td> <td>Banana</td> <td>Other</td> </tr> <tr> <td>A</td> <td>15</td> <td>20</td> <td>25</td> <td>10</td> <td>30</td> </tr> <tr> <td>B</td> <td>10</td> <td>25</td> <td>20</td> <td>25</td> <td>20</td> </tr> </table></div> </div> <h4>1.30MR</h4> <div class="text"> <p> 0 h2g0o0X Nn0rRT0:yW0f0D00L00girK\g0o00X N0NeQ0n0OM0X0QW0n0OM0.z^%Rn0)Rvn00F0k0puj00pK000000ƖY00S0h00H00000 </p> <center><img src="image1.jpg" width="310px" height="135px"alt="MRn0i n00000" /><br /> <p>V10MRn0i n00000</p></center> <p> 0 S0n00F0j0pen0000h0Nd0n0000000h0W0f0~0h00_00n00MR (RrRh) h0D0F00MRo00LRn0b5_g0B000MRo0pe array 0(uD0f0\ObY000 </p> <div class="code table"> > array(1:30,c(2,5,3)) <br/> <br /> <table style="width:300px"> <tr> <td>,,1</td> <td></td> <td></td> <td></td> <td></td> <td></td> </tr> <tr> <td></td> <td>[,1]</td> <td>[,2]</td> <td>[,3]</td> <td>[,4]</td> <td>[,5]</td> </tr> <tr> <td>[1,]</td> <td>1</td> <td>3</td> <td>5</td> <td>7</td> <td>9</td> </tr> <tr> <td>[2,]</td> <td>2</td> <td>4</td> <td>6</td> <td>8</td> <td>10</td> </tr> <tr> <td>,,2</td> <td></td> <td></td> <td></td> <td></td> <td></td> </tr> <tr> <td ></td> <td >[,1]</td> <td >[,2]</td> <td >[,3]</td> <td >[,4]</td> <td >[,5]</td> </tr> <tr> <td >[1,]</td> <td >11</td> <td >13</td> <td >15</td> <td >17</td> <td >19</td> </tr> <tr> <td >[2,]</td> <td >12</td> <td >14</td> <td >16</td> <td >18</td> <td >20</td> </tr> <tr> <td >,,3</td> <td ></td> <td ></td> <td ></td> <td ></td> <td ></td> </tr> <tr> <td ></td> <td >[,1]</td> <td >[,2]</td> <td >[,3]</td> <td >[,4]</td> <td >[,5]</td> </tr> <tr> <td >[1,]</td> <td >21</td> <td >23</td> <td >25</td> <td >27</td> <td >29</td> </tr> <tr> <td >[2,]</td> <td >22</td> <td >24</td> <td >26</td> <td >28</td> <td >30</td> </tr> </table></div> </div> <h4>1.40000</h4> <div class="text"> <p> 0 000o0000000LR0MR0000j0i0puj00W0Nd0n0000000h0W0f0qbF0S0h0L0Sj0000000g0B000000o0pe list 0(uD0f0\ObY000 </p> <div class="code table"> > L1<- list(c(1:8),c("A","B"),matrix(1:12,2,6)) <br /> > L1[1] <br/> <br /> [[1]] <br/> [1] 1 2 3 4 5 6 7 8 <br/> <br /> > L1[2] <br/> [[1]] <br/> [1] "A" "B" <br/> <br /> > L1[3] <br/> [[1]] <br/> <table style="width:300px"> <tr> <td ></td> <td >[,1]</td> <td >[,2]</td> <td >[,3]</td> <td >[,4]</td> <td >[,5]</td> <td >[,6]</td> </tr> <tr> <td >[1,]</td> <td >1</td> <td >3</td> <td >5</td> <td >7</td> <td >9</td> <td >11</td> </tr> <tr> <td >[2,]</td> <td >2</td> <td >4</td> <td >6</td> <td >8</td> <td >10</td> <td >12</td> </tr> </table></div> </div> <h3>200000000K0000</h3> <div class="text"> <p> 0 0000000k0o0U0~0V0~0j0b__L0B00L0g0^O0O(uU00f0D00n0o00000b__g0B0000000b__0000h0o00OX[U00_00000n0b5_P[L0 txt k0j0c0f0D000000g0B000R n0Yn0000000000 R k000n0k0o00pe read.table0scan L00O0O(uU00f0D000 </p> <h4>2.10read.tablek00000</h4> <div class="text"> <p> 0 pe read.table o0\0-N!jn0000h0 R k000n0k0iW0f0D000OH0p00V2n00F0k0 P0n0000000000B00D0o0 Tab 00g0:SR00C 0000n00000 RW k0 data1.txt h0D0F0 TMRg0OX[W0_0h0Y000 </p> <center><img src="image2.jpg" width="305px" height="115px"alt="00000000000n0\Ob;ub" /> <p>V2000000000000n0\Ob;ub</p></center> 0 !kn000000[LY00h00C 0000n00000 RW n0-Nk0OX[W0f0D00 data1.txt L0 data1 h0D0F0 TMRg0 R k00~0000 </p> <div class="code"> > data1<- read.table("C:/RW/data1.txt",header=T,row.names=1)<br/> </div> <p> 0 _pe header = T (B00D0o0 header = TRUE) o00000n0,{1LL0Rn0 TMRg0B00S0h00:yW00row.names = 1 o0,{1RL0Ln0 TMRg0B00S0h00:yY00L0B00D0o0Rn0 TMRL0j0D04XTo00[_Y00_pe0weuY000<br/> 0 00000000n0-Nn0000n0 }L0000g0:SR000data.txt h0W0f0OX[U00_04XT0read.table g000n0k0o0_pe 0sep = "," 0 0!kn00F0k0RY000 </p> <div class="code"> > read.table("C:/RW/data.txt",sep=",")<br/> </div> <p> 0 pe read.table 0(uD0f000`0000000000000 (data frame) h0F000000000Wn0000i o0LRk0 0 R k0o00h{000 Excel g0\ObW0_0 CSV b__n00000o0000pe read.csv L0(uaU00f0D000<br/> 0 pe read.table o0000000n0k0o0^8^k0O)Rg0B00L00'Yϑn0000n04XTk0o0N Ng0fY00pe scan h0kY00h0RsL00O0j0D00 </p> </div> <h4>2.20pe scan k00000</h4> <div class="text"> <p> 0 pe scan o00'Y!jn00000000 R k000n0k0iW0f0D000<br /> 0 OH0p00000L0V3n00F0k0pe$Pn00k000ibU000C 0000n00000 RW k0 data2.txt h0W0f0OX[U00_0h0Y000pe scan n0O(uO0!kk0:yY00 </p> <center><img src="image3.jpg" width="248px" height="132px"alt="data2n000000000"/> <p>V30data2 n000000000</p></center> <div class="code"> > scan("C:/RW/data2.txt") <br /> Read 12 items <br /> [1]0 1 020 30 40 50 60 70 80 90 50 20 1 <br/> </div> <p> 0 0W0000000000n0000L0000g0:SR00_04XTo00read.table 0(uD00h0M0h0 TX0O00pe scan n0-Nk0_pe 0sep = "," 0 0RH000pe scan 0(uD00h0000L01Lk00~00000c0f00pe scan g00~00_00000㉐gY00_00k0o00_j0b__x0n0 YcL0_g0B000<br/> 0 OH0p0000`012n0pe$P00003L4Rn0LRk0 YfW0_0D0h0M0k0o00pe matrix h0 scan 0!kn00F0k0D}0T0[00p00D00 </p> <div class="code table"> > matrix(scan("C:/RW/data2.txt"),3,4) <br /> Read 12 items <br /> <br /> <table> <tr> <td ></td> <td >[,1]</td> <td >[,2]</td> <td >[,3]</td> <td >[,4]</td> </tr> <tr> <td >[1,]</td> <td >1</td> <td >4</td> <td >7</td> <td >5</td> </tr> <tr> <td >[2,]</td> <td >2</td> <td >5</td> <td >8</td> <td >2</td> </tr> <tr> <td >[3,]</td> <td >3</td> <td >6</td> <td >9</td> <td >1</td> </tr> </table></div> </div> <div class="text"> <p> 0 data2.txt g0o00000L0*jk010203n0k0j0c0f0D00L00\ObW0_0LRo0000L0&~k010203n0k0j0c0f0D000<br/> 0 pe matrix k0_pe byrow = T (B00D0o0 byrow = TRUE) 0RH00h0000L0*jn0k0&Ny000_0LRk0j000 </p> <div class="code table"> > data2<- scan("C:/RW/data2.txt") <br /> > data2.M<- matrix(data2,3,4,byrow=T) <br /> > data2.M <br /> <br /> <table> <tr> <td ></td> <td >[,1]</td> <td >[,2]</td> <td >[,3]</td> <td >[,4]</td> </tr> <tr> <td >[1,]</td> <td >1</td> <td >2</td> <td >3</td> <td >4</td> </tr> <tr> <td >[2,]</td> <td >5</td> <td >6</td> <td >7</td> <td >8</td> </tr> <tr> <td >[3,]</td> <td >9</td> <td >5</td> <td >2</td> <td >1</td> </tr> </table></div> </div> <div class="text"> <p> 0 000k0pe$P0eW[L0m(WW0f0D004XT0pe scan 0(uD0f000n0k0o00RT0h0k0000n0^\'`0fY00_L0B000OH0p00 Nn00F0j0000 data3.txt L0B00h0Y000 </p> <div class="code table"> <table style="width:100px"> <tr> <td >A</td> <td >1</td> <td >5</td> </tr> <tr> <td >B</td> <td >2</td> <td >4</td> </tr> <tr> <td >C</td> <td >3</td> <td >3</td> </tr> </table> </div> <p> 0 S0n000000pe scan 0(uD0f000h0M0k0o00list 0(uD0f0Rn0000n0^\'`0fY000eW[n04XTo0   0pe$Pn04XTo00g0hY000 </p> <div class="code"> > data3<- scan("C:/RW/data3.txt",list(label="",x=0, y=0))<br/> </div> <p> 0 S0n00F0k00~00_0000o0000g0B000R Qn0LR000000000000o0J0ND0k0 YcY00S0h0L0g0M000LR000000000000k0 YcY00n0k0o0pe data.frame 0(uD000 </p> <div class="code table"> > data.frame(data3)<br/> <br /> <table style="width:180px"> <tr> <td ></td> <td >label</td> <td >x</td> <td >y</td> </tr> <tr> <td >1</td> <td >A</td> <td >1</td> <td >5</td> </tr> <tr> <td >2</td> <td >B</td> <td >2</td> <td >4</td> </tr> <tr> <td >3</td> <td >C</td> <td >3</td> <td >3</td> </tr> </table> <p> > data2.F<- data.frame(data2.M) <br/> > data2.F <br/> </p> <table style="width:200px"> <tr> <td ></td> <td >X1</td> <td >X2</td> <td >X3</td> <td >X4</td> </tr> <tr> <td >1</td> <td >1</td> <td >2</td> <td >3</td> <td >4</td> </tr> <tr> <td >2</td> <td >5</td> <td >6</td> <td >7</td> <td >8</td> </tr> <tr> <td >3</td> <td >9</td> <td >5</td> <td >2</td> <td >1</td> </tr> </table></div> </div> <div class="text"> <p> 0 00000000LRx0 YcY00n0k0o0pe as.matrix0B00D0o0 data.matrix 0(uD000 </p> <div class="code table"> > as.matrix(data2.F) <br/> <br /> <table style="width:200px"> <tr> <td ></td> <td >X1</td> <td >X2</td> <td >X3</td> <td >X4</td> </tr> <tr> <td >1</td> <td >1</td> <td >2</td> <td >3</td> <td >4</td> </tr> <tr> <td >2</td> <td >5</td> <td >6</td> <td >7</td> <td >8</td> </tr> <tr> <td >3</td> <td >9</td> <td >5</td> <td >2</td> <td >1</td> </tr> </table></div> </div> <div class="text"> <p> 0 ;ub Nk0ԏU00_0000n0i `0Q0g0o000000000g0B00K00LRg0B00K0R_k0o0RQ0L0NK0j0D04XT0B000<br/> 0 pe class 0(uD00h0000000n0^\'`0xY00S0h0L0g0M000 </p> <div class="code"> > class(data3) <br /> [1] "list" <br /> <br/> > class(data2.M) <br /> [1] "matrix" <br /> <br /> > class(data2.F) <br /> [1] "data.frame" <br /> <br /> > class(fruits) <br /> [1] "character" <br /> <br /> > class(sales) <br /> [1] "numeric" <br /> <br /> > class(c(TRUE,FALSE)) <br /> [1] "logical" <br /> </div> </div> <h3>3000n0QR</h3> <div class="text"> <p> 0 {P}gL0\ϑg0B00p0000000g0Sba0yY0K0000000k0QRU00_0P}g0000W0000000֊en0ezn0-Nk00NQ00p00D0L00QRn0P}gL0'Yϑg0K0d0Nn0000g0)R(uW0_0D0h0M0k0o000000h0W0f0QRW0f0J0O0h0O)Rg0B000<br/> 0 R n0000000000000h0W0f0 R n0Yk0QRY00peo0 write0write.table0sink j0i0L0B000<br/> 0 OH0p00R k0 Nn00F0j0000L0 rdata h0D0F0000000n0 TMRg0\ObU00_0h0Y000 </p> <div class="code table"> <table style="width:180px"> <tr> <td >1</td> <td >3</td> <td >5</td> <td >7</td> <td >9</td> </tr> <tr> <td >2</td> <td >4</td> <td >6</td> <td >8</td> <td >10</td> </tr> </table> </div> <p> 0 0000 </p> <div class="code"> > write(rdata,"C:/RW/OutData.txt") <br/> </div> <p> k000 rdata L0 OutData.txt h0D0F0 TMRg0 C 0000n00000 RW n0-Nk0QRU0000<br /> 0OutData.txt h0 rdata o00000n0&Ns0n0eTL0puj000QRU00_0000h0 R n0-Nn0000n0&Ns0eT0NU0[00_00k0o0 t pe0(uD0f0 R n0-Nn00000n (V) W0_0_QRY000nn0peo0 t g0B000 </p> <div class="code"> > write(t(rdata),"C:/RW/ OutData.txt")<br/> </div> <p> 0 S00g0 R n0Qn0000h0 R n0Yk0QRU00_0000n0&Ns0eL0 TX0k0j000~0_00QRY000000n0Rn0pe0c[Y00S0h00Sg0B000OH0p00!kn00F0k0fO0h0000L02Rg0QRU0000<br/> </p> <div class="code"> > write(t(rdata),"C:/RW/ OutData.txt",columns=2)<br/> </div> <p> 0 ~0_0QRU00_00000000 OutData.txt k0Nn00000_g0RW0_0D0h0M0k0o00 Nn00F0k0_pe append = TRUE 0RH0f0J0O0_L0B000<br/> </p> <div class="code"> > write(rdata2,"C:/RW/OutData.txt", append=TRUE)<br/> </div> <p> 0 pe write.table o000000000QRY00peg0B00000000000 write.table g0QRY00h00eW[Ro0 "" g0V~000pe$P000o0]0n0~0~0QRU0000LR0 write.table 0(uD0f0QRY00h0Y0y0f0n0000L0eW[Rh0W0f0qb0000pe write.table n0f_o0 write n0f_h0 TX0g0B000<br /> 0 pe sink o000000k0ԏU000Q[00000h0W0f0QRY00peg0B000 </p> <div class="code"> > sink ("C:/RW/temp.txt") <br /> > data2.M <br /> > data2.F <br /> > sink () <br /> </div> <p> 0 S0n03Ln00000k0000data2.M0data2.F L0C0000n00000 RW n0-Nk0 temp.txt h0D0F00000 Tg0QRU0000<br/> 0 pe sink n0f_o00QRL0YY000000 sink( **** ) h0QR0B}NY000000 sink() L000h0j0c0f0D000pe sink g00 write h0 TX0O00_pe append = TRUE 0(uD00h00QRW0_00000k00_g00000RY00S0h0L0g0M000<br/> 0 ~0_0000000 foreign 0(uD00h00SAS0SPSS0Stata0S-PLUS n00000b__K00n0000000S0h0L0Sg0B000 </p> </div> <h3>400000</h3> <div class="text"> <p> 0 R k0J0Q00peo0 R n0,gSOk0D}0~00_0WyR (base)h000000 (package) k0RQ0000000000k0o0gen0xvzP}gL0N,n0^n000000eO0eQKbg0M000n00B000skg0o02000H0000000L0)R(uSg0B000<br/> 0 R g0000000)R(uY00_00k0o00!kn02kn0\OmiL0_g0B000 </p> 0(1) 000000000000Y00<br/> 0(2) 00000000 <p> 0 R 0000000Y000;A~k0O(uU000h0`00020pe.z^n000000L0Rvk0000000U0000_n0V4n0 Select one 000000000n0000K00000000U00f0D00000000xY00S0h0L0g0M000000000U00f0D0j0D0000000000000Y00elo02h0J00B000 </p> <ol> <li> 0000000L0c}U00f0D00tXg000000n0 Packages ! Install Package(s) from CRAN (B00D0o0 Install Package(s) from Bioconductor) 00000W00Select 000000000K00_h0j000000000000Y00h00000000000000L0Y~000000000L0B}NY00h000000;ubk0000000W0_000000JRdY00K0i0F0K00 \m00 0Delete downloaded files (y/N)? 0h0D0F000000L0ԏU0000D0Z00K00xbW0f000D00S0S0g0o0chYU00f0D00 "N" 0eQRW0f0 Enter 000bY0S0h0k0Y000</li> <li> NMRk00000000B00D0o0000W0_000000n0 Zip (0000n0'W.~n0b__) 0000L00000k0OX[U00f0D004XTo00Packages ! Install Package(s) from local zip files 00000W00OX[U00f0D000000000S0h0g00000000 R k0000000Y00S0h0L0g0M000</li> </ol> 0 00000n000o0000000(uD00elh0000000(uD00elL0B0000000k000elo000000K0000000 (packages) 0M0000000n000 (load package) 00000W00Select one0000000000M00xb;ubK00_h0j00000000xbW00[OK] 00000000Y000Select one 0000000000V4k0:yY00<br/> 0 0000k000elo0000000;ubk0 library (00000n0 T) 0eQRW00[LY000<br/> </p> <center><img src="image4.jpg" width="55px" height="40px">000<img src="image5.jpg" width="235px" height="157px">000<img src="image6.jpg" width="220px" height="570px"> <p>0V4000000n0xb;ub</p></center> </div> <div align="right"><img src="image7.jpg" width="150px" height="210px"></div> </body> </html>