?datasets
library(help = "datasets")
data(sleep)
head(sleep)
|
extra
|
group
|
ID
|
<tr><td> 0.7</td><td>1 </td><td>1 </td></tr>
<tr><td>-1.6</td><td>1 </td><td>2 </td></tr>
<tr><td>-0.2</td><td>1 </td><td>3 </td></tr>
<tr><td>-1.2</td><td>1 </td><td>4 </td></tr>
<tr><td>-0.1</td><td>1 </td><td>5 </td></tr>
<tr><td> 3.4</td><td>1 </td><td>6 </td></tr>
str(sleep)
'data.frame': 20 obs. of 3 variables:
$ extra: num 0.7 -1.6 -0.2 -1.2 -0.1 3.4 3.7 0.8 0 2 ...
$ group: Factor w/ 2 levels "1","2": 1 1 1 1 1 1 1 1 1 1 ...
$ ID : Factor w/ 10 levels "1","2","3","4",..: 1 2 3 4 5 6 7 8 9 10 ...
set.seed(42)
sleep
|
extra
|
group
|
ID
|
<tr><td> 0.7</td><td>1 </td><td>1 </td></tr>
<tr><td>-1.6</td><td>1 </td><td>2 </td></tr>
<tr><td>-0.2</td><td>1 </td><td>3 </td></tr>
<tr><td>-1.2</td><td>1 </td><td>4 </td></tr>
<tr><td>-0.1</td><td>1 </td><td>5 </td></tr>
<tr><td> 3.4</td><td>1 </td><td>6 </td></tr>
<tr><td> 3.7</td><td>1 </td><td>7 </td></tr>
<tr><td> 0.8</td><td>1 </td><td>8 </td></tr>
<tr><td> 0.0</td><td>1 </td><td>9 </td></tr>
<tr><td> 2.0</td><td>1 </td><td>10 </td></tr>
<tr><td> 1.9</td><td>2 </td><td>1 </td></tr>
<tr><td> 0.8</td><td>2 </td><td>2 </td></tr>
<tr><td> 1.1</td><td>2 </td><td>3 </td></tr>
<tr><td> 0.1</td><td>2 </td><td>4 </td></tr>
<tr><td>-0.1</td><td>2 </td><td>5 </td></tr>
<tr><td> 4.4</td><td>2 </td><td>6 </td></tr>
<tr><td> 5.5</td><td>2 </td><td>7 </td></tr>
<tr><td> 1.6</td><td>2 </td><td>8 </td></tr>
<tr><td> 4.6</td><td>2 </td><td>9 </td></tr>
<tr><td> 3.4</td><td>2 </td><td>10 </td></tr>
data(women)
women
|
height
|
weight
|
<tr><td>58 </td><td>115</td></tr>
<tr><td>59 </td><td>117</td></tr>
<tr><td>60 </td><td>120</td></tr>
<tr><td>61 </td><td>123</td></tr>
<tr><td>62 </td><td>126</td></tr>
<tr><td>63 </td><td>129</td></tr>
<tr><td>64 </td><td>132</td></tr>
<tr><td>65 </td><td>135</td></tr>
<tr><td>66 </td><td>139</td></tr>
<tr><td>67 </td><td>142</td></tr>
<tr><td>68 </td><td>146</td></tr>
<tr><td>69 </td><td>150</td></tr>
<tr><td>70 </td><td>154</td></tr>
<tr><td>71 </td><td>159</td></tr>
<tr><td>72 </td><td>164</td></tr>
rock
|
area
|
peri
|
shape
|
perm
|
<tr><td> 4990 </td><td>2791.900 </td><td>0.0903296</td><td> 6.3 </td></tr>
<tr><td> 7002 </td><td>3892.600 </td><td>0.1486220</td><td> 6.3 </td></tr>
<tr><td> 7558 </td><td>3930.660 </td><td>0.1833120</td><td> 6.3 </td></tr>
<tr><td> 7352 </td><td>3869.320 </td><td>0.1170630</td><td> 6.3 </td></tr>
<tr><td> 7943 </td><td>3948.540 </td><td>0.1224170</td><td> 17.1 </td></tr>
<tr><td> 7979 </td><td>4010.150 </td><td>0.1670450</td><td> 17.1 </td></tr>
<tr><td> 9333 </td><td>4345.750 </td><td>0.1896510</td><td> 17.1 </td></tr>
<tr><td> 8209 </td><td>4344.750 </td><td>0.1641270</td><td> 17.1 </td></tr>
<tr><td> 8393 </td><td>3682.040 </td><td>0.2036540</td><td> 119.0 </td></tr>
<tr><td> 6425 </td><td>3098.650 </td><td>0.1623940</td><td> 119.0 </td></tr>
<tr><td> 9364 </td><td>4480.050 </td><td>0.1509440</td><td> 119.0 </td></tr>
<tr><td> 8624 </td><td>3986.240 </td><td>0.1481410</td><td> 119.0 </td></tr>
<tr><td>10651 </td><td>4036.540 </td><td>0.2285950</td><td> 82.4 </td></tr>
<tr><td> 8868 </td><td>3518.040 </td><td>0.2316230</td><td> 82.4 </td></tr>
<tr><td> 9417 </td><td>3999.370 </td><td>0.1725670</td><td> 82.4 </td></tr>
<tr><td> 8874 </td><td>3629.070 </td><td>0.1534810</td><td> 82.4 </td></tr>
<tr><td>10962 </td><td>4608.660 </td><td>0.2043140</td><td> 58.6 </td></tr>
<tr><td>10743 </td><td>4787.620 </td><td>0.2627270</td><td> 58.6 </td></tr>
<tr><td>11878 </td><td>4864.220 </td><td>0.2000710</td><td> 58.6 </td></tr>
<tr><td> 9867 </td><td>4479.410 </td><td>0.1448100</td><td> 58.6 </td></tr>
<tr><td> 7838 </td><td>3428.740 </td><td>0.1138520</td><td> 142.0 </td></tr>
<tr><td>11876 </td><td>4353.140 </td><td>0.2910290</td><td> 142.0 </td></tr>
<tr><td>12212 </td><td>4697.650 </td><td>0.2400770</td><td> 142.0 </td></tr>
<tr><td> 8233 </td><td>3518.440 </td><td>0.1618650</td><td> 142.0 </td></tr>
<tr><td> 6360 </td><td>1977.390 </td><td>0.2808870</td><td> 740.0 </td></tr>
<tr><td> 4193 </td><td>1379.350 </td><td>0.1794550</td><td> 740.0 </td></tr>
<tr><td> 7416 </td><td>1916.240 </td><td>0.1918020</td><td> 740.0 </td></tr>
<tr><td> 5246 </td><td>1585.420 </td><td>0.1330830</td><td> 740.0 </td></tr>
<tr><td> 6509 </td><td>1851.210 </td><td>0.2252140</td><td> 890.0 </td></tr>
<tr><td> 4895 </td><td>1239.660 </td><td>0.3412730</td><td> 890.0 </td></tr>
<tr><td> 6775 </td><td>1728.140 </td><td>0.3116460</td><td> 890.0 </td></tr>
<tr><td> 7894 </td><td>1461.060 </td><td>0.2760160</td><td> 890.0 </td></tr>
<tr><td> 5980 </td><td>1426.760 </td><td>0.1976530</td><td> 950.0 </td></tr>
<tr><td> 5318 </td><td> 990.388 </td><td>0.3266350</td><td> 950.0 </td></tr>
<tr><td> 7392 </td><td>1350.760 </td><td>0.1541920</td><td> 950.0 </td></tr>
<tr><td> 7894 </td><td>1461.060 </td><td>0.2760160</td><td> 950.0 </td></tr>
<tr><td> 3469 </td><td>1376.700 </td><td>0.1769690</td><td> 100.0 </td></tr>
<tr><td> 1468 </td><td> 476.322 </td><td>0.4387120</td><td> 100.0 </td></tr>
<tr><td> 3524 </td><td>1189.460 </td><td>0.1635860</td><td> 100.0 </td></tr>
<tr><td> 5267 </td><td>1644.960 </td><td>0.2538320</td><td> 100.0 </td></tr>
<tr><td> 5048 </td><td> 941.543 </td><td>0.3286410</td><td>1300.0 </td></tr>
<tr><td> 1016 </td><td> 308.642 </td><td>0.2300810</td><td>1300.0 </td></tr>
<tr><td> 5605 </td><td>1145.690 </td><td>0.4641250</td><td>1300.0 </td></tr>
<tr><td> 8793 </td><td>2280.490 </td><td>0.4204770</td><td>1300.0 </td></tr>
<tr><td> 3475 </td><td>1174.110 </td><td>0.2007440</td><td> 580.0 </td></tr>
<tr><td> 1651 </td><td> 597.808 </td><td>0.2626510</td><td> 580.0 </td></tr>
<tr><td> 5514 </td><td>1455.880 </td><td>0.1824530</td><td> 580.0 </td></tr>
<tr><td> 9718 </td><td>1485.580 </td><td>0.2004470</td><td> 580.0 </td></tr>
rivers
<li>735</li>
<li>320</li>
<li>325</li>
<li>392</li>
<li>524</li>
<li>450</li>
<li>1459</li>
<li>135</li>
<li>465</li>
<li>600</li>
<li>330</li>
<li>336</li>
<li>280</li>
<li>315</li>
<li>870</li>
<li>906</li>
<li>202</li>
<li>329</li>
<li>290</li>
<li>1000</li>
<li>600</li>
<li>505</li>
<li>1450</li>
<li>840</li>
<li>1243</li>
<li>890</li>
<li>350</li>
<li>407</li>
<li>286</li>
<li>280</li>
<li>525</li>
<li>720</li>
<li>390</li>
<li>250</li>
<li>327</li>
<li>230</li>
<li>265</li>
<li>850</li>
<li>210</li>
<li>630</li>
<li>260</li>
<li>230</li>
<li>360</li>
<li>730</li>
<li>600</li>
<li>306</li>
<li>390</li>
<li>420</li>
<li>291</li>
<li>710</li>
<li>340</li>
<li>217</li>
<li>281</li>
<li>352</li>
<li>259</li>
<li>250</li>
<li>470</li>
<li>680</li>
<li>570</li>
<li>350</li>
<li>300</li>
<li>560</li>
<li>900</li>
<li>625</li>
<li>332</li>
<li>2348</li>
<li>1171</li>
<li>3710</li>
<li>2315</li>
<li>2533</li>
<li>780</li>
<li>280</li>
<li>410</li>
<li>460</li>
<li>260</li>
<li>255</li>
<li>431</li>
<li>350</li>
<li>760</li>
<li>618</li>
<li>338</li>
<li>981</li>
<li>1306</li>
<li>500</li>
<li>696</li>
<li>605</li>
<li>250</li>
<li>411</li>
<li>1054</li>
<li>735</li>
<li>233</li>
<li>435</li>
<li>490</li>
<li>310</li>
<li>460</li>
<li>383</li>
<li>375</li>
<li>1270</li>
<li>545</li>
<li>445</li>
<li>1885</li>
<li>380</li>
<li>300</li>
<li>380</li>
<li>377</li>
<li>425</li>
<li>276</li>
<li>210</li>
<li>800</li>
<li>420</li>
<li>350</li>
<li>360</li>
<li>538</li>
<li>1100</li>
<li>1205</li>
<li>314</li>
<li>237</li>
<li>610</li>
<li>360</li>
<li>540</li>
<li>1038</li>
<li>424</li>
<li>310</li>
<li>300</li>
<li>444</li>
<li>301</li>
<li>268</li>
<li>620</li>
<li>215</li>
<li>652</li>
<li>900</li>
<li>525</li>
<li>246</li>
<li>360</li>
<li>529</li>
<li>500</li>
<li>720</li>
<li>270</li>
<li>430</li>
<li>671</li>
<li>1770</li>
ChickWeight
|
weight
|
Time
|
Chick
|
Diet
|
<tr><td> 42</td><td> 0 </td><td>1 </td><td>1 </td></tr>
<tr><td> 51</td><td> 2 </td><td>1 </td><td>1 </td></tr>
<tr><td> 59</td><td> 4 </td><td>1 </td><td>1 </td></tr>
<tr><td> 64</td><td> 6 </td><td>1 </td><td>1 </td></tr>
<tr><td> 76</td><td> 8 </td><td>1 </td><td>1 </td></tr>
<tr><td> 93</td><td>10 </td><td>1 </td><td>1 </td></tr>
<tr><td>106</td><td>12 </td><td>1 </td><td>1 </td></tr>
<tr><td>125</td><td>14 </td><td>1 </td><td>1 </td></tr>
<tr><td>149</td><td>16 </td><td>1 </td><td>1 </td></tr>
<tr><td>171</td><td>18 </td><td>1 </td><td>1 </td></tr>
<tr><td>199</td><td>20 </td><td>1 </td><td>1 </td></tr>
<tr><td>205</td><td>21 </td><td>1 </td><td>1 </td></tr>
<tr><td> 40</td><td> 0 </td><td>2 </td><td>1 </td></tr>
<tr><td> 49</td><td> 2 </td><td>2 </td><td>1 </td></tr>
<tr><td> 58</td><td> 4 </td><td>2 </td><td>1 </td></tr>
<tr><td> 72</td><td> 6 </td><td>2 </td><td>1 </td></tr>
<tr><td> 84</td><td> 8 </td><td>2 </td><td>1 </td></tr>
<tr><td>103</td><td>10 </td><td>2 </td><td>1 </td></tr>
<tr><td>122</td><td>12 </td><td>2 </td><td>1 </td></tr>
<tr><td>138</td><td>14 </td><td>2 </td><td>1 </td></tr>
<tr><td>162</td><td>16 </td><td>2 </td><td>1 </td></tr>
<tr><td>187</td><td>18 </td><td>2 </td><td>1 </td></tr>
<tr><td>209</td><td>20 </td><td>2 </td><td>1 </td></tr>
<tr><td>215</td><td>21 </td><td>2 </td><td>1 </td></tr>
<tr><td> 43</td><td> 0 </td><td>3 </td><td>1 </td></tr>
<tr><td> 39</td><td> 2 </td><td>3 </td><td>1 </td></tr>
<tr><td> 55</td><td> 4 </td><td>3 </td><td>1 </td></tr>
<tr><td> 67</td><td> 6 </td><td>3 </td><td>1 </td></tr>
<tr><td> 84</td><td> 8 </td><td>3 </td><td>1 </td></tr>
<tr><td> 99</td><td>10 </td><td>3 </td><td>1 </td></tr>
<tr><td>⋮</td><td>⋮</td><td>⋮</td><td>⋮</td></tr>
<tr><td>154</td><td>12 </td><td>48 </td><td>4 </td></tr>
<tr><td>170</td><td>14 </td><td>48 </td><td>4 </td></tr>
<tr><td>222</td><td>16 </td><td>48 </td><td>4 </td></tr>
<tr><td>261</td><td>18 </td><td>48 </td><td>4 </td></tr>
<tr><td>303</td><td>20 </td><td>48 </td><td>4 </td></tr>
<tr><td>322</td><td>21 </td><td>48 </td><td>4 </td></tr>
<tr><td> 40</td><td> 0 </td><td>49 </td><td>4 </td></tr>
<tr><td> 53</td><td> 2 </td><td>49 </td><td>4 </td></tr>
<tr><td> 64</td><td> 4 </td><td>49 </td><td>4 </td></tr>
<tr><td> 85</td><td> 6 </td><td>49 </td><td>4 </td></tr>
<tr><td>108</td><td> 8 </td><td>49 </td><td>4 </td></tr>
<tr><td>128</td><td>10 </td><td>49 </td><td>4 </td></tr>
<tr><td>152</td><td>12 </td><td>49 </td><td>4 </td></tr>
<tr><td>166</td><td>14 </td><td>49 </td><td>4 </td></tr>
<tr><td>184</td><td>16 </td><td>49 </td><td>4 </td></tr>
<tr><td>203</td><td>18 </td><td>49 </td><td>4 </td></tr>
<tr><td>233</td><td>20 </td><td>49 </td><td>4 </td></tr>
<tr><td>237</td><td>21 </td><td>49 </td><td>4 </td></tr>
<tr><td> 41</td><td> 0 </td><td>50 </td><td>4 </td></tr>
<tr><td> 54</td><td> 2 </td><td>50 </td><td>4 </td></tr>
<tr><td> 67</td><td> 4 </td><td>50 </td><td>4 </td></tr>
<tr><td> 84</td><td> 6 </td><td>50 </td><td>4 </td></tr>
<tr><td>105</td><td> 8 </td><td>50 </td><td>4 </td></tr>
<tr><td>122</td><td>10 </td><td>50 </td><td>4 </td></tr>
<tr><td>155</td><td>12 </td><td>50 </td><td>4 </td></tr>
<tr><td>175</td><td>14 </td><td>50 </td><td>4 </td></tr>
<tr><td>205</td><td>16 </td><td>50 </td><td>4 </td></tr>
<tr><td>234</td><td>18 </td><td>50 </td><td>4 </td></tr>
<tr><td>264</td><td>20 </td><td>50 </td><td>4 </td></tr>
<tr><td>264</td><td>21 </td><td>50 </td><td>4 </td></tr>
Orange
|
Tree
|
age
|
circumference
|
<tr><td>1 </td><td> 118</td><td> 30 </td></tr>
<tr><td>1 </td><td> 484</td><td> 58 </td></tr>
<tr><td>1 </td><td> 664</td><td> 87 </td></tr>
<tr><td>1 </td><td>1004</td><td>115 </td></tr>
<tr><td>1 </td><td>1231</td><td>120 </td></tr>
<tr><td>1 </td><td>1372</td><td>142 </td></tr>
<tr><td>1 </td><td>1582</td><td>145 </td></tr>
<tr><td>2 </td><td> 118</td><td> 33 </td></tr>
<tr><td>2 </td><td> 484</td><td> 69 </td></tr>
<tr><td>2 </td><td> 664</td><td>111 </td></tr>
<tr><td>2 </td><td>1004</td><td>156 </td></tr>
<tr><td>2 </td><td>1231</td><td>172 </td></tr>
<tr><td>2 </td><td>1372</td><td>203 </td></tr>
<tr><td>2 </td><td>1582</td><td>203 </td></tr>
<tr><td>3 </td><td> 118</td><td> 30 </td></tr>
<tr><td>3 </td><td> 484</td><td> 51 </td></tr>
<tr><td>3 </td><td> 664</td><td> 75 </td></tr>
<tr><td>3 </td><td>1004</td><td>108 </td></tr>
<tr><td>3 </td><td>1231</td><td>115 </td></tr>
<tr><td>3 </td><td>1372</td><td>139 </td></tr>
<tr><td>3 </td><td>1582</td><td>140 </td></tr>
<tr><td>4 </td><td> 118</td><td> 32 </td></tr>
<tr><td>4 </td><td> 484</td><td> 62 </td></tr>
<tr><td>4 </td><td> 664</td><td>112 </td></tr>
<tr><td>4 </td><td>1004</td><td>167 </td></tr>
<tr><td>4 </td><td>1231</td><td>179 </td></tr>
<tr><td>4 </td><td>1372</td><td>209 </td></tr>
<tr><td>4 </td><td>1582</td><td>214 </td></tr>
<tr><td>5 </td><td> 118</td><td> 30 </td></tr>
<tr><td>5 </td><td> 484</td><td> 49 </td></tr>
<tr><td>5 </td><td> 664</td><td> 81 </td></tr>
<tr><td>5 </td><td>1004</td><td>125 </td></tr>
<tr><td>5 </td><td>1231</td><td>142 </td></tr>
<tr><td>5 </td><td>1372</td><td>174 </td></tr>
<tr><td>5 </td><td>1582</td><td>177 </td></tr>
OrchardSprays
|
decrease
|
rowpos
|
colpos
|
treatment
|
<tr><td> 57</td><td>1 </td><td>1 </td><td>D </td></tr>
<tr><td> 95</td><td>2 </td><td>1 </td><td>E </td></tr>
<tr><td> 8</td><td>3 </td><td>1 </td><td>B </td></tr>
<tr><td> 69</td><td>4 </td><td>1 </td><td>H </td></tr>
<tr><td> 92</td><td>5 </td><td>1 </td><td>G </td></tr>
<tr><td> 90</td><td>6 </td><td>1 </td><td>F </td></tr>
<tr><td> 15</td><td>7 </td><td>1 </td><td>C </td></tr>
<tr><td> 2</td><td>8 </td><td>1 </td><td>A </td></tr>
<tr><td> 84</td><td>1 </td><td>2 </td><td>C </td></tr>
<tr><td> 6</td><td>2 </td><td>2 </td><td>B </td></tr>
<tr><td>127</td><td>3 </td><td>2 </td><td>H </td></tr>
<tr><td> 36</td><td>4 </td><td>2 </td><td>D </td></tr>
<tr><td> 51</td><td>5 </td><td>2 </td><td>E </td></tr>
<tr><td> 2</td><td>6 </td><td>2 </td><td>A </td></tr>
<tr><td> 69</td><td>7 </td><td>2 </td><td>F </td></tr>
<tr><td> 71</td><td>8 </td><td>2 </td><td>G </td></tr>
<tr><td> 87</td><td>1 </td><td>3 </td><td>F </td></tr>
<tr><td> 72</td><td>2 </td><td>3 </td><td>H </td></tr>
<tr><td> 5</td><td>3 </td><td>3 </td><td>A </td></tr>
<tr><td> 39</td><td>4 </td><td>3 </td><td>E </td></tr>
<tr><td> 22</td><td>5 </td><td>3 </td><td>D </td></tr>
<tr><td> 16</td><td>6 </td><td>3 </td><td>C </td></tr>
<tr><td> 72</td><td>7 </td><td>3 </td><td>G </td></tr>
<tr><td> 4</td><td>8 </td><td>3 </td><td>B </td></tr>
<tr><td>130</td><td>1 </td><td>4 </td><td>H </td></tr>
<tr><td> 4</td><td>2 </td><td>4 </td><td>A </td></tr>
<tr><td>114</td><td>3 </td><td>4 </td><td>E </td></tr>
<tr><td> 9</td><td>4 </td><td>4 </td><td>C </td></tr>
<tr><td> 20</td><td>5 </td><td>4 </td><td>F </td></tr>
<tr><td> 24</td><td>6 </td><td>4 </td><td>G </td></tr>
<tr><td>⋮</td><td>⋮</td><td>⋮</td><td>⋮</td></tr>
<tr><td> 60</td><td>3 </td><td>5 </td><td>G </td></tr>
<tr><td> 5</td><td>4 </td><td>5 </td><td>A </td></tr>
<tr><td> 17</td><td>5 </td><td>5 </td><td>C </td></tr>
<tr><td> 7</td><td>6 </td><td>5 </td><td>B </td></tr>
<tr><td> 81</td><td>7 </td><td>5 </td><td>H </td></tr>
<tr><td> 71</td><td>8 </td><td>5 </td><td>F </td></tr>
<tr><td> 12</td><td>1 </td><td>6 </td><td>A </td></tr>
<tr><td> 29</td><td>2 </td><td>6 </td><td>C </td></tr>
<tr><td> 44</td><td>3 </td><td>6 </td><td>F </td></tr>
<tr><td> 77</td><td>4 </td><td>6 </td><td>G </td></tr>
<tr><td> 4</td><td>5 </td><td>6 </td><td>B </td></tr>
<tr><td> 27</td><td>6 </td><td>6 </td><td>D </td></tr>
<tr><td> 47</td><td>7 </td><td>6 </td><td>E </td></tr>
<tr><td> 76</td><td>8 </td><td>6 </td><td>H </td></tr>
<tr><td> 8</td><td>1 </td><td>7 </td><td>B </td></tr>
<tr><td> 72</td><td>2 </td><td>7 </td><td>G </td></tr>
<tr><td> 13</td><td>3 </td><td>7 </td><td>C </td></tr>
<tr><td> 57</td><td>4 </td><td>7 </td><td>F </td></tr>
<tr><td> 4</td><td>5 </td><td>7 </td><td>A </td></tr>
<tr><td> 81</td><td>6 </td><td>7 </td><td>H </td></tr>
<tr><td> 20</td><td>7 </td><td>7 </td><td>D </td></tr>
<tr><td> 61</td><td>8 </td><td>7 </td><td>E </td></tr>
<tr><td> 80</td><td>1 </td><td>8 </td><td>G </td></tr>
<tr><td>114</td><td>2 </td><td>8 </td><td>F </td></tr>
<tr><td> 39</td><td>3 </td><td>8 </td><td>D </td></tr>
<tr><td> 14</td><td>4 </td><td>8 </td><td>B </td></tr>
<tr><td> 86</td><td>5 </td><td>8 </td><td>H </td></tr>
<tr><td> 55</td><td>6 </td><td>8 </td><td>E </td></tr>
<tr><td> 3</td><td>7 </td><td>8 </td><td>A </td></tr>
<tr><td> 19</td><td>8 </td><td>8 </td><td>C </td></tr>
USArrests
|
|
Murder
|
Assault
|
UrbanPop
|
Rape
|
<tr><th scope=row>Alabama</th><td>13.2</td><td>236 </td><td>58 </td><td>21.2</td></tr>
<tr><th scope=row>Alaska</th><td>10.0</td><td>263 </td><td>48 </td><td>44.5</td></tr>
<tr><th scope=row>Arizona</th><td> 8.1</td><td>294 </td><td>80 </td><td>31.0</td></tr>
<tr><th scope=row>Arkansas</th><td> 8.8</td><td>190 </td><td>50 </td><td>19.5</td></tr>
<tr><th scope=row>California</th><td> 9.0</td><td>276 </td><td>91 </td><td>40.6</td></tr>
<tr><th scope=row>Colorado</th><td> 7.9</td><td>204 </td><td>78 </td><td>38.7</td></tr>
<tr><th scope=row>Connecticut</th><td> 3.3</td><td>110 </td><td>77 </td><td>11.1</td></tr>
<tr><th scope=row>Delaware</th><td> 5.9</td><td>238 </td><td>72 </td><td>15.8</td></tr>
<tr><th scope=row>Florida</th><td>15.4</td><td>335 </td><td>80 </td><td>31.9</td></tr>
<tr><th scope=row>Georgia</th><td>17.4</td><td>211 </td><td>60 </td><td>25.8</td></tr>
<tr><th scope=row>Hawaii</th><td> 5.3</td><td> 46 </td><td>83 </td><td>20.2</td></tr>
<tr><th scope=row>Idaho</th><td> 2.6</td><td>120 </td><td>54 </td><td>14.2</td></tr>
<tr><th scope=row>Illinois</th><td>10.4</td><td>249 </td><td>83 </td><td>24.0</td></tr>
<tr><th scope=row>Indiana</th><td> 7.2</td><td>113 </td><td>65 </td><td>21.0</td></tr>
<tr><th scope=row>Iowa</th><td> 2.2</td><td> 56 </td><td>57 </td><td>11.3</td></tr>
<tr><th scope=row>Kansas</th><td> 6.0</td><td>115 </td><td>66 </td><td>18.0</td></tr>
<tr><th scope=row>Kentucky</th><td> 9.7</td><td>109 </td><td>52 </td><td>16.3</td></tr>
<tr><th scope=row>Louisiana</th><td>15.4</td><td>249 </td><td>66 </td><td>22.2</td></tr>
<tr><th scope=row>Maine</th><td> 2.1</td><td> 83 </td><td>51 </td><td> 7.8</td></tr>
<tr><th scope=row>Maryland</th><td>11.3</td><td>300 </td><td>67 </td><td>27.8</td></tr>
<tr><th scope=row>Massachusetts</th><td> 4.4</td><td>149 </td><td>85 </td><td>16.3</td></tr>
<tr><th scope=row>Michigan</th><td>12.1</td><td>255 </td><td>74 </td><td>35.1</td></tr>
<tr><th scope=row>Minnesota</th><td> 2.7</td><td> 72 </td><td>66 </td><td>14.9</td></tr>
<tr><th scope=row>Mississippi</th><td>16.1</td><td>259 </td><td>44 </td><td>17.1</td></tr>
<tr><th scope=row>Missouri</th><td> 9.0</td><td>178 </td><td>70 </td><td>28.2</td></tr>
<tr><th scope=row>Montana</th><td> 6.0</td><td>109 </td><td>53 </td><td>16.4</td></tr>
<tr><th scope=row>Nebraska</th><td> 4.3</td><td>102 </td><td>62 </td><td>16.5</td></tr>
<tr><th scope=row>Nevada</th><td>12.2</td><td>252 </td><td>81 </td><td>46.0</td></tr>
<tr><th scope=row>New Hampshire</th><td> 2.1</td><td> 57 </td><td>56 </td><td> 9.5</td></tr>
<tr><th scope=row>New Jersey</th><td> 7.4</td><td>159 </td><td>89 </td><td>18.8</td></tr>
<tr><th scope=row>New Mexico</th><td>11.4</td><td>285 </td><td>70 </td><td>32.1</td></tr>
<tr><th scope=row>New York</th><td>11.1</td><td>254 </td><td>86 </td><td>26.1</td></tr>
<tr><th scope=row>North Carolina</th><td>13.0</td><td>337 </td><td>45 </td><td>16.1</td></tr>
<tr><th scope=row>North Dakota</th><td> 0.8</td><td> 45 </td><td>44 </td><td> 7.3</td></tr>
<tr><th scope=row>Ohio</th><td> 7.3</td><td>120 </td><td>75 </td><td>21.4</td></tr>
<tr><th scope=row>Oklahoma</th><td> 6.6</td><td>151 </td><td>68 </td><td>20.0</td></tr>
<tr><th scope=row>Oregon</th><td> 4.9</td><td>159 </td><td>67 </td><td>29.3</td></tr>
<tr><th scope=row>Pennsylvania</th><td> 6.3</td><td>106 </td><td>72 </td><td>14.9</td></tr>
<tr><th scope=row>Rhode Island</th><td> 3.4</td><td>174 </td><td>87 </td><td> 8.3</td></tr>
<tr><th scope=row>South Carolina</th><td>14.4</td><td>279 </td><td>48 </td><td>22.5</td></tr>
<tr><th scope=row>South Dakota</th><td> 3.8</td><td> 86 </td><td>45 </td><td>12.8</td></tr>
<tr><th scope=row>Tennessee</th><td>13.2</td><td>188 </td><td>59 </td><td>26.9</td></tr>
<tr><th scope=row>Texas</th><td>12.7</td><td>201 </td><td>80 </td><td>25.5</td></tr>
<tr><th scope=row>Utah</th><td> 3.2</td><td>120 </td><td>80 </td><td>22.9</td></tr>
<tr><th scope=row>Vermont</th><td> 2.2</td><td> 48 </td><td>32 </td><td>11.2</td></tr>
<tr><th scope=row>Virginia</th><td> 8.5</td><td>156 </td><td>63 </td><td>20.7</td></tr>
<tr><th scope=row>Washington</th><td> 4.0</td><td>145 </td><td>73 </td><td>26.2</td></tr>
<tr><th scope=row>West Virginia</th><td> 5.7</td><td> 81 </td><td>39 </td><td> 9.3</td></tr>
<tr><th scope=row>Wisconsin</th><td> 2.6</td><td> 53 </td><td>66 </td><td>10.8</td></tr>
<tr><th scope=row>Wyoming</th><td> 6.8</td><td>161 </td><td>60 </td><td>15.6</td></tr>
cars
|
speed
|
dist
|
<tr><td> 4 </td><td> 2</td></tr>
<tr><td> 4 </td><td> 10</td></tr>
<tr><td> 7 </td><td> 4</td></tr>
<tr><td> 7 </td><td> 22</td></tr>
<tr><td> 8 </td><td> 16</td></tr>
<tr><td> 9 </td><td> 10</td></tr>
<tr><td>10 </td><td> 18</td></tr>
<tr><td>10 </td><td> 26</td></tr>
<tr><td>10 </td><td> 34</td></tr>
<tr><td>11 </td><td> 17</td></tr>
<tr><td>11 </td><td> 28</td></tr>
<tr><td>12 </td><td> 14</td></tr>
<tr><td>12 </td><td> 20</td></tr>
<tr><td>12 </td><td> 24</td></tr>
<tr><td>12 </td><td> 28</td></tr>
<tr><td>13 </td><td> 26</td></tr>
<tr><td>13 </td><td> 34</td></tr>
<tr><td>13 </td><td> 34</td></tr>
<tr><td>13 </td><td> 46</td></tr>
<tr><td>14 </td><td> 26</td></tr>
<tr><td>14 </td><td> 36</td></tr>
<tr><td>14 </td><td> 60</td></tr>
<tr><td>14 </td><td> 80</td></tr>
<tr><td>15 </td><td> 20</td></tr>
<tr><td>15 </td><td> 26</td></tr>
<tr><td>15 </td><td> 54</td></tr>
<tr><td>16 </td><td> 32</td></tr>
<tr><td>16 </td><td> 40</td></tr>
<tr><td>17 </td><td> 32</td></tr>
<tr><td>17 </td><td> 40</td></tr>
<tr><td>17 </td><td> 50</td></tr>
<tr><td>18 </td><td> 42</td></tr>
<tr><td>18 </td><td> 56</td></tr>
<tr><td>18 </td><td> 76</td></tr>
<tr><td>18 </td><td> 84</td></tr>
<tr><td>19 </td><td> 36</td></tr>
<tr><td>19 </td><td> 46</td></tr>
<tr><td>19 </td><td> 68</td></tr>
<tr><td>20 </td><td> 32</td></tr>
<tr><td>20 </td><td> 48</td></tr>
<tr><td>20 </td><td> 52</td></tr>
<tr><td>20 </td><td> 56</td></tr>
<tr><td>20 </td><td> 64</td></tr>
<tr><td>22 </td><td> 66</td></tr>
<tr><td>23 </td><td> 54</td></tr>
<tr><td>24 </td><td> 70</td></tr>
<tr><td>24 </td><td> 92</td></tr>
<tr><td>24 </td><td> 93</td></tr>
<tr><td>24 </td><td>120</td></tr>
<tr><td>25 </td><td> 85</td></tr>
uspop
Time Series:
Start = 1790
End = 1970
Frequency = 0.1
[1] 3.93 5.31 7.24 9.64 12.90 17.10 23.20 31.40 39.80 50.20
[11] 62.90 76.00 92.00 105.70 122.80 131.70 151.30 179.30 203.20
data(USArrests)
head(USArrests)
|
|
Murder
|
Assault
|
UrbanPop
|
Rape
|
<tr><th scope=row>Alabama</th><td>13.2</td><td>236 </td><td>58 </td><td>21.2</td></tr>
<tr><th scope=row>Alaska</th><td>10.0</td><td>263 </td><td>48 </td><td>44.5</td></tr>
<tr><th scope=row>Arizona</th><td> 8.1</td><td>294 </td><td>80 </td><td>31.0</td></tr>
<tr><th scope=row>Arkansas</th><td> 8.8</td><td>190 </td><td>50 </td><td>19.5</td></tr>
<tr><th scope=row>California</th><td> 9.0</td><td>276 </td><td>91 </td><td>40.6</td></tr>
<tr><th scope=row>Colorado</th><td> 7.9</td><td>204 </td><td>78 </td><td>38.7</td></tr>
set.seed(42)
km <-kmeans(USArrests[,1:4], 10, nstart=25) #why won't it let me set the number of clusters to 50?
km
K-means clustering with 10 clusters of sizes 4, 6, 3, 7, 8, 5, 2, 2, 10, 3
Cluster means:
Murder Assault UrbanPop Rape
1 9.950000 288.75000 77.00000 32.875000
2 11.500000 195.33333 66.16667 27.433333
3 3.866667 83.33333 45.00000 9.966667
4 11.471429 247.57143 74.28571 27.200000
5 5.750000 156.75000 74.00000 19.400000
6 2.980000 56.80000 65.60000 13.340000
7 14.200000 336.00000 62.50000 24.000000
8 1.500000 46.50000 38.00000 9.250000
9 5.590000 112.40000 65.60000 17.270000
10 13.500000 267.00000 46.66667 28.033333
Clustering vector:
Alabama Alaska Arizona Arkansas California
4 10 1 2 1
Colorado Connecticut Delaware Florida Georgia
2 9 4 7 2
Hawaii Idaho Illinois Indiana Iowa
6 9 4 9 6
Kansas Kentucky Louisiana Maine Maryland
9 9 4 3 1
Massachusetts Michigan Minnesota Mississippi Missouri
5 4 6 10 2
Montana Nebraska Nevada New Hampshire New Jersey
9 9 4 6 5
New Mexico New York North Carolina North Dakota Ohio
1 4 7 8 9
Oklahoma Oregon Pennsylvania Rhode Island South Carolina
5 5 9 5 10
South Dakota Tennessee Texas Utah Vermont
3 2 2 9 8
Virginia Washington West Virginia Wisconsin Wyoming
5 5 3 6 5
Within cluster sum of squares by cluster:
[1] 782.5475 1694.9600 104.3200 1613.0771 1792.6600 913.8400 742.2000
[8] 85.0850 1480.2100 675.7933
(between_SS / total_SS = 97.2 %)
Available components:
[1] "cluster" "centers" "totss" "withinss" "tot.withinss"
[6] "betweenss" "size" "iter" "ifault"
table(km$cluster, USArrests$State) #How do I change the column header to "State"??
Error in table(km$cluster, USArrests$Alabama): all arguments must have the same length
Traceback:
1. table(km$cluster, USArrests$Alabama)
2. stop("all arguments must have the same length")
plot(USArrests[,1],USArrests[,2], col=km$cluster)
points(km$centers[,c(3,4)], col=1:3, pch=8, cex=2)
```