# Mindanao State University
# General Santos City
# Introduction to R base commands
# Prepared by: Ehjie Bob A. Jumaway
# Student
# Math Department
# March 21, 2023
# Processing of continuous data
# Using random number generators
# Exer1: generate data with mean 2 and standard deviation 1.5 using rnorm() command
data <- rnorm(1000,2,1.5) # 1 thousand values
length(data) # count number of elements
## [1] 1000
## [1] 1000
data[1:20] # display first 20 elements
## [1] 0.8212292 3.8373775 2.3933322 1.5995944 1.1666721 4.0535308
## [7] 0.5932258 3.2851322 3.6770145 2.9249392 3.2627255 5.0057901
## [13] -0.6576320 3.9336992 2.8590366 0.5692789 2.0992101 -0.4168984
## [19] 2.1147834 2.3624817
## [1] 2.5301773 2.1433329 2.7461992 0.7191137 3.2323958 3.5984216
## [7] 0.1271980 -1.5035094 1.0505412 1.1516095 -0.5724505 3.0382656
## [13] 0.1978632 4.8605855 1.7109003 1.4850920 0.8958760 0.9233573
## [19] 1.9103658 3.1534402
data[1:300] # display the first 300 elements
## [1] 0.821229172 3.837377527 2.393332222 1.599594424 1.166672068
## [6] 4.053530752 0.593225820 3.285132191 3.677014501 2.924939195
## [11] 3.262725480 5.005790149 -0.657632004 3.933699165 2.859036588
## [16] 0.569278862 2.099210139 -0.416898398 2.114783386 2.362481680
## [21] 2.756634873 3.124686812 -0.002088106 0.782613625 1.833376961
## [26] 2.646547918 -2.206918118 3.367529997 2.094360435 4.447022686
## [31] 3.218956683 1.558977029 1.788248084 5.219907260 3.636560868
## [36] 3.313760326 1.425370117 2.641995232 0.339195347 4.654836653
## [41] 2.502123992 3.594602396 2.851749520 2.797659167 1.067314311
## [46] 3.276952638 -0.803047452 3.915062080 1.739429059 -0.081190896
## [51] 3.012392842 1.819204022 -0.619395120 3.488878158 2.283913653
## [56] 3.307519575 -0.367422047 -1.745441588 -0.442531620 0.531535119
## [61] 1.417800807 -1.974664175 3.628294391 3.978784643 2.647974839
## [66] 1.262603879 1.534395202 1.188757193 2.294355433 3.580550863
## [71] -0.403678432 -0.726070370 2.641968470 5.327918540 2.414307190
## [76] 2.995458197 1.855873836 1.275345487 1.496817009 1.273108882
## [81] 2.469768752 3.059223355 0.556097244 2.677023323 0.238609570
## [86] 1.314147238 3.621290350 -0.084699111 0.170200358 2.358064798
## [91] 0.856090755 -2.116907652 0.712541217 1.701862056 1.682213056
## [96] 2.240958667 1.371168246 2.620158363 -0.285188293 2.790153982
## [101] 2.687072775 -1.980080019 0.204291978 2.720255854 3.447957871
## [106] 1.060286615 0.946419659 0.993391576 4.955671438 4.654328774
## [111] 1.606253102 4.718575884 0.531694703 3.855480734 3.049354532
## [116] 2.254468061 4.156862001 2.621037017 1.733721782 2.430890446
## [121] 0.234922208 1.805676173 2.601917124 1.883286733 0.374434707
## [126] 2.216380723 5.549166311 4.023406774 3.662294390 2.697344308
## [131] 4.342555137 -1.139645590 3.630250517 4.143436955 2.175813430
## [136] 1.444428667 -0.316573211 2.155898463 3.241868394 1.333997731
## [141] 3.427736860 2.785605543 1.052682623 2.210117079 2.903835498
## [146] 2.521468452 0.079563228 2.190689247 1.369082479 3.368724266
## [151] 3.212812698 1.094765684 1.396173395 2.039918311 3.691632391
## [156] 0.373745747 2.706188161 2.334990758 -1.190578157 0.056721379
## [161] 2.955582575 0.189104557 1.763113960 2.678547035 -0.509829496
## [166] 3.253045023 1.634019783 1.582134177 1.026194857 3.923583996
## [171] 4.804582269 3.951372875 2.026965567 3.363294724 2.135214757
## [176] 0.237686762 5.423394530 2.867888446 6.099057668 0.665062234
## [181] 4.975725484 2.059326456 3.498997715 3.110910844 3.057571971
## [186] 3.537403565 1.924119452 3.818760854 5.228674355 1.439267255
## [191] 2.589687592 2.518985630 0.227321006 2.514675882 2.731027216
## [196] 3.875905822 3.302706452 -0.518637578 1.217286212 -0.431147824
## [201] 0.619033241 5.307734404 1.442496782 3.752997254 0.631264694
## [206] 0.050544262 5.452915684 -0.581581268 3.804120775 2.114346082
## [211] 3.089953593 0.494220239 3.000950809 0.281694081 3.750178062
## [216] 5.052645303 3.959705101 3.599971308 2.988651350 3.884106603
## [221] 3.018222756 -1.020517332 1.660169793 3.248641645 0.853775358
## [226] 3.431870088 1.552940813 2.656618348 2.573240892 2.770242764
## [231] 5.101064696 2.951055529 2.395515840 2.261005793 3.799198385
## [236] -1.693287506 2.041695485 2.396292810 2.590017285 1.003923408
## [241] 3.503347136 1.041710815 1.850892212 -4.048816523 2.686322408
## [246] 3.613285170 0.721114698 3.523996740 1.331075522 1.138947667
## [251] 1.542041543 1.455160721 2.257322561 1.305537300 3.150189150
## [256] 5.014890015 0.796422030 4.209090580 3.287697457 2.935797890
## [261] 3.151953667 1.873029548 2.241232985 4.261498174 2.996296076
## [266] -0.094307909 1.242206949 0.620982100 2.822070417 -1.135914235
## [271] 1.446925603 2.700423031 2.311281441 3.246191774 1.778366181
## [276] 3.354676670 3.966433758 1.798351827 3.507876567 1.786710854
## [281] 2.234861601 2.619632686 1.285543033 3.659130576 3.320445372
## [286] 1.903271614 -0.168679144 5.005573038 3.409899544 4.423734470
## [291] 2.135520034 1.500676149 1.319288759 0.541255941 3.274995088
## [296] 2.232171677 0.708355272 0.197206895 -1.124595635 3.818604132
## [1] 2.53017729 2.14333287 2.74619917 0.71911371 3.23239577 3.59842156
## [7] 0.12719804 -1.50350940 1.05054122 1.15160954 -0.57245047 3.03826556
## [13] 0.19786324 4.86058548 1.71090027 1.48509205 0.89587598 0.92335733
## [19] 1.91036581 3.15344023 5.01095876 0.75518489 1.15872555 1.82397581
## [25] 1.50632586 1.70451599 1.71363965 3.16092542 1.41424246 2.70767519
## [31] 2.34194604 1.12922626 4.18295372 3.41712818 3.25516589 3.05053743
## [37] 2.47589292 0.47143164 -0.35358646 0.94239599 2.19532992 -0.34707714
## [43] 0.72822654 2.30719960 4.60896771 -0.38553970 1.51808335 1.75324622
## [49] 3.54546895 2.54469933 3.68790809 1.62037411 1.80931174 3.21205768
## [55] 3.64204633 3.87653431 1.59626534 0.03258597 4.06113852 0.08584966
1
## [1] 1
## [61] 2.40483453 3.08791868 5.87272754 2.28367265 1.19629550 1.23368431
## [67] 2.26210886 4.45251460 3.94986536 -0.05017694 3.63721288 2.14730728
## [73] 1.22865278 -1.42413222 4.93708263 4.19257067 4.03429238 1.80774185
## [79] 2.15666292 2.76533613 1.88500634 2.42736388 0.31655924 3.22756032
## [85] 1.67470075 1.68793583 3.23808692 2.48080479 4.63653054 0.98998566
## [91] 2.53575797 2.36378688 -0.73546788 1.47872156 0.52086139 2.71338695
## [97] 1.64264726 -0.03791427 3.95907237 3.31417822 0.82689494 3.32884200
## [103] 2.53981645 2.06174817 1.02317400 3.12359841 1.88881456 2.72975600
## [109] 1.38909232 1.97472713 -0.34187563 3.70868997 1.47445785 3.30526679
## [115] 1.99389648 2.83270561 3.51509687 1.27900433 -0.27240020 3.13985177
## [121] 2.60164412 3.66566796 0.27142563 3.61860788 2.14488065 4.44576638
## [127] 2.52361200 -0.02018926 -0.25735321 -0.14514788 -0.04724710 2.05061401
## [133] 1.23601331 2.36341686 2.51724459 1.30403881 1.91736742 -1.21160814
## [139] 0.42810944 4.34646701 3.78801599 2.09373401 -1.58873917 3.90993262
## [145] 6.46316120 3.46810043 2.77923434 1.67690946 1.67591261 0.69017881
## [151] 3.25044564 2.14475244 0.61749419 3.58543756 0.20688825 3.20380741
## [157] 4.44093990 1.28085659 1.93543571 4.17826882 1.26279160 0.27243645
## [163] 2.92818134 -0.49234735 2.01833799 -0.73042899 0.99737820 1.57241572
## [169] -1.45721689 3.51880972 1.66399557 1.06835349 0.30032527 1.03057396
## [175] 0.30861280 0.69947727 -0.15339295 4.03024048 -0.19428241 1.16544111
## [181] 1.64142335 2.48844230 0.74131615 0.85648847 0.98333780 2.08331348
## [187] 1.57065808 1.90518256 0.46158262 3.49711027 0.65980659 1.35496600
## [193] 3.47621214 2.17367392 2.38684434 2.53219931 1.23622560 1.10682177
## [199] 1.03657751 -0.92355901 -0.05330628 0.61958041 1.33936637 0.47472995
## [205] 4.05561795 0.17189757 1.79880350 2.64016349 1.10200620 2.21361803
## [211] 2.90493832 2.10541709 2.67174008 2.89207565 2.39642030 0.93116301
## [217] -0.10528053 4.16901238 1.41683546 2.74381871 1.02245214 3.19642203
## [223] 4.05721867 0.41828482 4.07060640 1.56632748 1.97136238 2.21232125
## [229] 1.32515136 0.81734762 0.70201719 0.57576807 3.35980598 2.44865382
## [235] 2.62899771 1.03307040 0.50243425 1.30908838 0.14736192 1.55326124
## [241] 1.54341528 1.84158493 0.54586864 2.68452555 0.67190664 3.37086889
## [247] 3.76657256 1.45899596 -1.19260984 3.13319096 -0.25374195 3.73154570
## [253] 3.15600168 2.01901610 3.08196253 0.10009726 2.06570085 -1.34419441
## [259] 1.10782841 1.29243410 -0.24975947 1.67180825 0.87073013 2.75159933
## [265] 4.56599691 2.55598017 1.37452517 3.43774643 0.51216846 3.34991311
## [271] 2.07740756 2.32332660 1.68143674 0.40572880 2.85049458 2.91784367
## [277] -0.64081632 3.74438714 0.88266679 2.78489378 1.29391291 2.87166677
## [283] -1.93194656 2.57689838 2.18230703 0.40949431 2.94160025 1.96983849
## [289] 1.50542856 1.98466586 0.77916145 1.15143327 4.41782602 3.01918213
## [295] 4.82105886 0.90341428 0.77589011 2.54892354 2.02331959 -1.28331697
# Exer2: Draw histogram with one main title and different thickness
maintitle <- "Histogram and Density Plot"
hist(data, breaks=20,col="lightgreen",main = maintitle)

hist(data, breaks=40,col="lightgreen",main = maintitle)

hist(data, breaks=100,col="violet",main = maintitle)

hist(data, breaks=300,col="violet",main = maintitle)

# Exer3: Draw histogram with one main title and sub title
subtitle <- "This is my second title"
maintitle <- paste0("Histogram and Density Plot \n",subtitle)
hist(data, breaks=20,col="brown",main = maintitle)

hist(data, breaks=40,col="lightblue",main = maintitle)

hist(data, breaks=100,col="lightgreen",main = maintitle)

# Question: What causes the subtitle to be in the second line?
# Exer4: Draw histogram with main title and sub title
subtitle <- "This is my second title"
maintitle <- paste0("Histogram and Density Plot \n",subtitle)
hist(data, breaks=20,col="yellow",main = maintitle)
# # Add density curve. We define the range of the density curve
x = seq(from=min(data), to=max(data), length.out=100)
norm_dist = dnorm(x, mean=mean(data), sd=sd(data)) * (max(data)-min(data))/ 20*length(data)
lines(x, norm_dist, col='red',lwd=4)

# Exer5: Draw histogram with main title and sub title
subtitle <- "This is my second title"
maintitle <- paste0("Histogram and Density Plot \n",subtitle)
hist(data, breaks=20,col="lightblue",main = maintitle)
# Add density curve and the location of the mean value
(x = seq(from=min(data), to=max(data), length.out=100))
## [1] -4.04881652 -3.94153206 -3.83424760 -3.72696314 -3.61967868 -3.51239422
## [7] -3.40510976 -3.29782531 -3.19054085 -3.08325639 -2.97597193 -2.86868747
## [13] -2.76140301 -2.65411855 -2.54683409 -2.43954963 -2.33226517 -2.22498071
## [19] -2.11769625 -2.01041179 -1.90312733 -1.79584287 -1.68855841 -1.58127395
## [25] -1.47398949 -1.36670503 -1.25942057 -1.15213611 -1.04485165 -0.93756719
## [31] -0.83028273 -0.72299827 -0.61571381 -0.50842935 -0.40114489 -0.29386043
## [37] -0.18657597 -0.07929151 0.02799295 0.13527741 0.24256187 0.34984633
## [43] 0.45713079 0.56441525 0.67169971 0.77898417 0.88626862 0.99355308
## [49] 1.10083754 1.20812200 1.31540646 1.42269092 1.52997538 1.63725984
## [55] 1.74454430 1.85182876 1.95911322 2.06639768 2.17368214 2.28096660
## [61] 2.38825106 2.49553552 2.60281998 2.71010444 2.81738890 2.92467336
## [67] 3.03195782 3.13924228 3.24652674 3.35381120 3.46109566 3.56838012
## [73] 3.67566458 3.78294904 3.89023350 3.99751796 4.10480242 4.21208688
## [79] 4.31937134 4.42665580 4.53394026 4.64122472 4.74850918 4.85579364
## [85] 4.96307810 5.07036255 5.17764701 5.28493147 5.39221593 5.49950039
## [91] 5.60678485 5.71406931 5.82135377 5.92863823 6.03592269 6.14320715
## [97] 6.25049161 6.35777607 6.46506053 6.57234499
## [1] -2.31383083 -2.22004644 -2.12626204 -2.03247765 -1.93869325 -1.84490885
## [7] -1.75112446 -1.65734006 -1.56355567 -1.46977127 -1.37598687 -1.28220248
## [13] -1.18841808 -1.09463369 -1.00084929 -0.90706489 -0.81328050 -0.71949610
## [19] -0.62571171 -0.53192731 -0.43814291 -0.34435852 -0.25057412 -0.15678973
## [25] -0.06300533 0.03077907 0.12456346 0.21834786 0.31213225 0.40591665
## [31] 0.49970105 0.59348544 0.68726984 0.78105423 0.87483863 0.96862303
## [37] 1.06240742 1.15619182 1.24997621 1.34376061 1.43754501 1.53132940
## [43] 1.62511380 1.71889819 1.81268259 1.90646699 2.00025138 2.09403578
## [49] 2.18782017 2.28160457 2.37538896 2.46917336 2.56295776 2.65674215
## [55] 2.75052655 2.84431094 2.93809534 3.03187974 3.12566413 3.21944853
## [61] 3.31323292 3.40701732 3.50080172 3.59458611 3.68837051 3.78215490
## [67] 3.87593930 3.96972370 4.06350809 4.15729249 4.25107688 4.34486128
## [73] 4.43864568 4.53243007 4.62621447 4.71999886 4.81378326 4.90756766
## [79] 5.00135205 5.09513645 5.18892084 5.28270524 5.37648964 5.47027403
## [85] 5.56405843 5.65784282 5.75162722 5.84541162 5.93919601 6.03298041
## [91] 6.12676480 6.22054920 6.31433360 6.40811799 6.50190239 6.59568678
## [97] 6.68947118 6.78325558 6.87703997 6.97082437
norm_dist = dnorm(x, mean=mean(data), sd=sd(data)) * (max(data)-min(data))/ 20*length(data)
lines(x, norm_dist, col='green',lwd=4)
abline(v = mean(data), col="red", lwd=3, lty=2)
# Add legend to top right position
legend("topright",
legend = c("Histogram", "density curve", "Average"),
col = c("lightblue", "green", "red"),
lty = 1)

# Compute Quartile values Q1,Q2 and Q3
# These quantities divide the data into 4 equal parts
hist(data, breaks=20,col="lightblue",main = maintitle)
Quantiles = quantile(data)
Quantiles
## 0% 25% 50% 75% 100%
## -4.048817 1.006447 2.136249 3.228084 6.572345
## 0% 25% 50% 75% 100%
## -2.3138308 0.9883237 1.9792709 3.0830225 6.9708244
# locate the quartiles Q1, Q2, Q3
abline(v = Quantiles[2], col="violet", lwd=3, lty=3)
abline(v = Quantiles[3], col="blue", lwd=3, lty=3)
abline(v = Quantiles[4], col="red", lwd=3, lty=3)

# Exer6: Locate the lowest 5% and the highest 5% of the distribution
data
## [1] 0.821229172 3.837377527 2.393332222 1.599594424 1.166672068
## [6] 4.053530752 0.593225820 3.285132191 3.677014501 2.924939195
## [11] 3.262725480 5.005790149 -0.657632004 3.933699165 2.859036588
## [16] 0.569278862 2.099210139 -0.416898398 2.114783386 2.362481680
## [21] 2.756634873 3.124686812 -0.002088106 0.782613625 1.833376961
## [26] 2.646547918 -2.206918118 3.367529997 2.094360435 4.447022686
## [31] 3.218956683 1.558977029 1.788248084 5.219907260 3.636560868
## [36] 3.313760326 1.425370117 2.641995232 0.339195347 4.654836653
## [41] 2.502123992 3.594602396 2.851749520 2.797659167 1.067314311
## [46] 3.276952638 -0.803047452 3.915062080 1.739429059 -0.081190896
## [51] 3.012392842 1.819204022 -0.619395120 3.488878158 2.283913653
## [56] 3.307519575 -0.367422047 -1.745441588 -0.442531620 0.531535119
## [61] 1.417800807 -1.974664175 3.628294391 3.978784643 2.647974839
## [66] 1.262603879 1.534395202 1.188757193 2.294355433 3.580550863
## [71] -0.403678432 -0.726070370 2.641968470 5.327918540 2.414307190
## [76] 2.995458197 1.855873836 1.275345487 1.496817009 1.273108882
## [81] 2.469768752 3.059223355 0.556097244 2.677023323 0.238609570
## [86] 1.314147238 3.621290350 -0.084699111 0.170200358 2.358064798
## [91] 0.856090755 -2.116907652 0.712541217 1.701862056 1.682213056
## [96] 2.240958667 1.371168246 2.620158363 -0.285188293 2.790153982
## [101] 2.687072775 -1.980080019 0.204291978 2.720255854 3.447957871
## [106] 1.060286615 0.946419659 0.993391576 4.955671438 4.654328774
## [111] 1.606253102 4.718575884 0.531694703 3.855480734 3.049354532
## [116] 2.254468061 4.156862001 2.621037017 1.733721782 2.430890446
## [121] 0.234922208 1.805676173 2.601917124 1.883286733 0.374434707
## [126] 2.216380723 5.549166311 4.023406774 3.662294390 2.697344308
## [131] 4.342555137 -1.139645590 3.630250517 4.143436955 2.175813430
## [136] 1.444428667 -0.316573211 2.155898463 3.241868394 1.333997731
## [141] 3.427736860 2.785605543 1.052682623 2.210117079 2.903835498
## [146] 2.521468452 0.079563228 2.190689247 1.369082479 3.368724266
## [151] 3.212812698 1.094765684 1.396173395 2.039918311 3.691632391
## [156] 0.373745747 2.706188161 2.334990758 -1.190578157 0.056721379
## [161] 2.955582575 0.189104557 1.763113960 2.678547035 -0.509829496
## [166] 3.253045023 1.634019783 1.582134177 1.026194857 3.923583996
## [171] 4.804582269 3.951372875 2.026965567 3.363294724 2.135214757
## [176] 0.237686762 5.423394530 2.867888446 6.099057668 0.665062234
## [181] 4.975725484 2.059326456 3.498997715 3.110910844 3.057571971
## [186] 3.537403565 1.924119452 3.818760854 5.228674355 1.439267255
## [191] 2.589687592 2.518985630 0.227321006 2.514675882 2.731027216
## [196] 3.875905822 3.302706452 -0.518637578 1.217286212 -0.431147824
## [201] 0.619033241 5.307734404 1.442496782 3.752997254 0.631264694
## [206] 0.050544262 5.452915684 -0.581581268 3.804120775 2.114346082
## [211] 3.089953593 0.494220239 3.000950809 0.281694081 3.750178062
## [216] 5.052645303 3.959705101 3.599971308 2.988651350 3.884106603
## [221] 3.018222756 -1.020517332 1.660169793 3.248641645 0.853775358
## [226] 3.431870088 1.552940813 2.656618348 2.573240892 2.770242764
## [231] 5.101064696 2.951055529 2.395515840 2.261005793 3.799198385
## [236] -1.693287506 2.041695485 2.396292810 2.590017285 1.003923408
## [241] 3.503347136 1.041710815 1.850892212 -4.048816523 2.686322408
## [246] 3.613285170 0.721114698 3.523996740 1.331075522 1.138947667
## [251] 1.542041543 1.455160721 2.257322561 1.305537300 3.150189150
## [256] 5.014890015 0.796422030 4.209090580 3.287697457 2.935797890
## [261] 3.151953667 1.873029548 2.241232985 4.261498174 2.996296076
## [266] -0.094307909 1.242206949 0.620982100 2.822070417 -1.135914235
## [271] 1.446925603 2.700423031 2.311281441 3.246191774 1.778366181
## [276] 3.354676670 3.966433758 1.798351827 3.507876567 1.786710854
## [281] 2.234861601 2.619632686 1.285543033 3.659130576 3.320445372
## [286] 1.903271614 -0.168679144 5.005573038 3.409899544 4.423734470
## [291] 2.135520034 1.500676149 1.319288759 0.541255941 3.274995088
## [296] 2.232171677 0.708355272 0.197206895 -1.124595635 3.818604132
## [301] 0.113502509 0.863542726 4.514669874 -1.782424129 1.008119447
## [306] 3.797562582 1.558383901 4.676074244 1.545908202 3.646356694
## [311] 0.630358127 4.521565929 1.790782806 2.735505126 3.048258918
## [316] 3.390187764 2.120341588 4.189878424 4.134147782 3.078116598
## [321] 2.955956019 1.812092759 2.245845572 3.349471751 5.562172253
## [326] 2.719797297 0.335784743 3.550023240 -0.377739564 -0.196931440
## [331] 1.216780612 3.896290714 1.046118364 2.201321864 0.443926486
## [336] 2.853653346 1.440866898 1.458444548 1.002454337 1.242140030
## [341] 2.728621057 -0.210860465 1.986893535 2.038115669 3.739716121
## [346] 1.698567124 1.937946142 0.344911435 3.352325470 2.117253050
## [351] 2.409408190 2.808434974 -0.530089204 2.207742128 0.717960861
## [356] 2.708230029 0.367944748 2.166745394 1.367486110 4.292469574
## [361] 3.062731946 1.682060145 2.588698299 4.223222833 5.923050838
## [366] 2.365688217 4.011290977 1.633523139 2.771040648 1.594327111
## [371] 4.066447537 0.669633192 2.478283037 2.937287205 0.444896878
## [376] 0.784359541 0.185404880 3.769201314 -0.620075077 2.691630509
## [381] 3.400042763 0.390228795 2.983286572 3.874388094 3.450753108
## [386] 4.397456080 2.665394663 0.740571207 0.995950439 3.458493499
## [391] 2.537304622 -1.352480021 5.330434672 0.537171902 3.049730837
## [396] 2.545128005 0.235951328 3.305247716 1.664471100 -0.555109209
## [401] 0.404267920 -0.493676153 1.336981850 3.420855374 3.213705751
## [406] 4.968449621 2.865175086 2.477611252 1.827183891 2.575930506
## [411] 4.660288810 1.902903176 3.227932252 2.136977704 4.895422505
## [416] 0.791639824 1.865176289 -0.578868251 3.162341145 1.286953367
## [421] 2.508602722 2.138965302 3.397457873 0.707480849 2.887197623
## [426] 3.684438453 2.603970220 2.393501757 3.007582261 2.985976111
## [431] 4.451636093 0.475619261 1.471848712 0.891731700 1.439656532
## [436] 2.171476341 3.500679615 2.247092411 -0.375120054 2.670979006
## [441] 3.261137455 0.150691309 0.331520943 4.679101134 3.774405088
## [446] 2.596084294 1.909168819 5.609403977 0.178590339 2.321607690
## [451] 3.122376156 2.432072851 1.837925446 1.506310543 1.170033081
## [456] 1.565734663 1.747138958 3.044962619 3.442690035 -0.086575603
## [461] 1.639286380 3.680374973 3.454924527 3.218532668 2.869687172
## [466] 1.312926371 1.896896807 2.805279332 4.246501002 1.980511333
## [471] 2.636931822 2.635370926 1.942197314 1.250722140 5.743821537
## [476] 2.157263380 0.113593681 3.734232309 2.619078122 3.248016212
## [481] 2.381858775 0.543379922 3.826581738 3.154737098 3.268455949
## [486] 3.389822026 2.714020399 3.113244050 2.030869240 2.342519085
## [491] 2.841751452 3.212325765 0.216694797 0.867062601 3.271861311
## [496] 2.024992765 1.027093660 2.340973504 2.731859275 2.091850178
## [501] 4.671715530 1.306899939 3.347713604 -0.151808147 3.370626598
## [506] 1.329529836 0.510425577 0.685776823 0.575658332 -0.897110917
## [511] -1.015297927 -0.587073262 0.338982781 1.843176367 -0.086311122
## [516] 1.117643655 2.992770540 -0.894649625 1.121214820 2.273730131
## [521] -0.364255029 3.338860656 1.381874059 2.438508740 1.608517086
## [526] -3.453383408 3.315687286 -0.427812569 1.381871116 3.534261892
## [531] -1.796141968 0.970801886 -0.345772384 0.904028534 2.391740521
## [536] 2.608903761 2.196234480 -1.295827857 2.703888834 2.886243549
## [541] 3.744768722 4.952947999 0.886060655 2.577894384 2.837253095
## [546] 2.801302938 1.500419081 5.197270132 -0.668397040 4.335687955
## [551] 1.860060275 3.287603577 -0.163602285 1.500684091 -0.560989067
## [556] 2.476220138 3.922280434 0.113270048 0.957955236 2.615239358
## [561] 3.037034333 1.691658174 5.407110701 1.462812630 3.615511065
## [566] 1.358392709 2.110391150 1.714593604 0.940592590 5.449709970
## [571] -0.771964434 0.377884991 1.794683397 1.905771024 4.095061307
## [576] 0.562466070 -0.519147868 1.557749294 3.457388236 -0.236672440
## [581] 2.931693005 4.817354589 4.027646794 2.083262578 0.316215523
## [586] 3.297158613 3.188946271 5.322201180 1.507460764 3.408209940
## [591] 2.287864823 5.227293471 3.941577149 1.142262863 1.822906946
## [596] 0.282466124 2.869004763 0.900994086 1.347189715 2.956249351
## [601] 4.738465370 3.377291141 1.544962965 0.449083353 0.918333913
## [606] 1.357039511 3.762047568 3.849861447 1.683741935 -0.573708937
## [611] 1.907879715 5.357643567 -2.842318266 2.909810674 3.596962228
## [616] 0.535010056 1.623925813 1.806196405 4.155954401 2.421142579
## [621] 0.976797055 -1.474529214 4.384573784 -1.073040527 0.645286001
## [626] 2.324671650 4.360359294 0.589984047 2.323185319 1.525097583
## [631] 4.377181377 0.361992291 0.686758582 2.155560608 -0.119008858
## [636] 0.871717202 3.446251390 2.494691668 2.364501565 3.215253396
## [641] 0.204448228 2.563630547 1.558376726 2.264028723 4.364915086
## [646] -0.160874507 2.176166652 1.445884925 2.506951999 1.394862401
## [651] 4.111284787 1.521010765 2.505995974 4.032932830 4.631315991
## [656] 4.394996612 0.872581108 0.841752986 1.959909931 2.609873147
## [661] 1.072819742 1.069301750 2.610870660 0.678860568 1.108947142
## [666] 0.805991594 3.340395275 3.039716794 2.662724142 1.174128298
## [671] -0.083592561 2.332425223 -1.445845425 2.972602685 1.589460536
## [676] 1.759238405 -0.482712543 0.797382313 1.082916254 1.658249912
## [681] 3.353401423 0.270184313 0.652409661 -1.826127956 2.830918058
## [686] 2.423091202 3.539976146 3.238188802 3.481034448 -0.091598674
## [691] 1.217774384 1.124290003 3.589904492 1.230983883 1.504501984
## [696] 0.636609340 0.891169944 2.216547778 1.543714372 1.227534793
## [701] 0.353001199 4.498274025 -0.485511166 3.108905057 2.022881223
## [706] 0.787080262 4.268957353 2.542488087 0.443231883 1.500713509
## [711] 3.671849193 3.717497563 4.020020580 1.787743003 3.784645354
## [716] 0.523191047 3.815737934 1.528491779 2.272036687 5.562215485
## [721] 3.207999930 1.029383409 0.130855196 4.209865150 2.707681577
## [726] 2.270850791 0.042597923 2.169169858 -1.193313651 1.693586525
## [731] 5.494186056 1.131460495 2.916419950 -0.140452524 2.788957300
## [736] 2.061768996 0.990722338 -3.369788355 -1.412824267 1.578237856
## [741] 1.190450413 0.611913747 2.082301596 2.974801431 2.736006418
## [746] -0.149491335 4.649623184 5.099263090 1.200325517 0.375263709
## [751] 0.783210014 1.023444956 0.096386115 2.888010703 2.514412320
## [756] 0.690045327 -0.076948381 -1.746524304 2.996471350 1.007288161
## [761] 1.712200219 1.963046826 0.193687456 4.264189871 1.968467517
## [766] 1.693109162 2.063799159 -1.313037159 2.221751721 1.846086714
## [771] 1.345478395 1.641272795 3.875485328 5.323516656 -1.214151424
## [776] 3.228538412 3.891812977 4.041207066 1.472064223 2.389706111
## [781] 1.258081638 1.498693765 0.501103656 0.868328542 4.180414440
## [786] 0.747762576 4.335575695 2.503060303 2.686365169 4.081352530
## [791] 3.963756298 2.752641208 3.637856339 3.860374853 2.716194574
## [796] 3.487793216 1.962184615 -0.059098919 2.259020624 2.275531128
## [801] 3.278430561 1.396193072 1.031218578 5.074902455 1.653979314
## [806] 1.859946851 1.995574411 2.564537957 1.200629140 0.683558692
## [811] 2.700470981 -3.597115135 2.947885175 -1.195893883 0.735949308
## [816] 1.912398892 2.050307469 3.393033304 1.444523288 1.187529615
## [821] 2.808144588 3.434201002 3.505892513 0.780978236 3.340418387
## [826] 1.328393893 3.549885619 1.552589526 -0.970563267 2.050335058
## [831] 6.572344991 0.391663208 3.579157221 2.253371847 0.942110990
## [836] -0.471121338 2.545032862 1.177068242 2.552550463 3.772306546
## [841] 3.685970590 4.417383204 4.103417695 3.106714411 -0.739444344
## [846] 1.740737773 2.023378834 3.258267139 0.165454808 2.021612705
## [851] 5.338693796 1.821566574 1.523816609 3.329721809 2.206487678
## [856] 3.057689454 1.377759094 1.892258602 2.290167214 2.958968933
## [861] 1.992014510 5.248384507 -0.209220921 4.723675263 2.794831291
## [866] 2.980129024 1.872860019 -0.099251244 3.264786140 3.611471943
## [871] 2.298030555 -0.627558674 2.872968917 2.794863115 4.646036824
## [876] 2.910528893 -0.207718851 0.223129582 -2.628202007 -0.826171537
## [881] 2.290834934 0.419054058 -1.358499855 0.939842049 2.060529244
## [886] 0.359497144 3.303663399 1.706547070 4.906608897 0.150566834
## [891] 2.875086504 1.593282024 0.173754953 3.399651277 0.982088868
## [896] 3.173492438 1.504077219 2.976825213 1.841652146 2.158963826
## [901] 2.294963101 1.555336971 2.113958487 2.001469172 1.318477902
## [906] 1.473852069 -1.071563300 1.150616891 -0.316193841 -1.159017104
## [911] 2.481011436 1.988627359 1.195625645 1.910462311 -0.200671423
## [916] 4.092273369 3.299621029 1.265179266 2.911308488 2.388576456
## [921] 2.174049022 1.574866004 0.141476669 1.409880150 -0.380906638
## [926] 2.010385464 1.579105932 4.405505632 2.856350854 1.812059054
## [931] -0.144218679 2.031185459 4.624570973 3.149920604 3.031947852
## [936] -0.734539464 1.709979235 5.173935949 1.633287718 0.736385139
## [941] -0.600908140 4.520711803 4.465173838 0.966000431 0.500436334
## [946] 3.988023399 3.062981268 1.340544137 2.232746314 1.068666277
## [951] 2.146884094 2.885083372 2.603627573 1.541750847 -0.762945213
## [956] 3.516617444 0.620178247 -0.185762415 2.791928823 0.795575131
## [961] 1.320561892 -0.513274270 1.562332611 4.195137020 2.646975482
## [966] 0.799830772 2.183676096 -1.054089781 4.470274452 3.194105966
## [971] 3.304821761 1.946560879 1.941523760 1.901542474 2.634410178
## [976] 3.460014180 3.044501809 5.218272334 1.055482192 -1.043825681
## [981] 1.490282110 5.112009627 3.777069287 4.661879196 1.673506356
## [986] -0.867613088 2.060579282 2.667610954 1.123657470 4.136973746
## [991] 3.676783149 3.436749985 -0.147798784 0.816086186 1.948450516
## [996] 3.547672396 0.543291707 0.605950356 2.738584900 1.360471914
## [1] 2.530177288 2.143332874 2.746199168 0.719113711 3.232395769
## [6] 3.598421558 0.127198038 -1.503509401 1.050541220 1.151609537
## [11] -0.572450468 3.038265558 0.197863242 4.860585483 1.710900274
## [16] 1.485092047 0.895875984 0.923357331 1.910365810 3.153440230
## [21] 5.010958756 0.755184887 1.158725547 1.823975814 1.506325857
## [26] 1.704515986 1.713639650 3.160925415 1.414242457 2.707675194
## [31] 2.341946038 1.129226259 4.182953723 3.417128179 3.255165889
## [36] 3.050537428 2.475892922 0.471431642 -0.353586459 0.942395991
## [41] 2.195329920 -0.347077145 0.728226538 2.307199605 4.608967711
## [46] -0.385539696 1.518083355 1.753246217 3.545468955 2.544699326
## [51] 3.687908090 1.620374109 1.809311743 3.212057677 3.642046331
## [56] 3.876534306 1.596265342 0.032585972 4.061138520 0.085849664
## [61] 2.404834534 3.087918676 5.872727541 2.283672648 1.196295504
## [66] 1.233684308 2.262108864 4.452514598 3.949865359 -0.050176936
## [71] 3.637212882 2.147307277 1.228652779 -1.424132221 4.937082631
## [76] 4.192570668 4.034292375 1.807741853 2.156662917 2.765336126
## [81] 1.885006343 2.427363882 0.316559238 3.227560324 1.674700750
## [86] 1.687935833 3.238086919 2.480804793 4.636530544 0.989985656
## [91] 2.535757969 2.363786877 -0.735467884 1.478721561 0.520861394
## [96] 2.713386952 1.642647259 -0.037914271 3.959072365 3.314178223
## [101] 0.826894935 3.328842004 2.539816450 2.061748170 1.023174000
## [106] 3.123598409 1.888814555 2.729755999 1.389092323 1.974727131
## [111] -0.341875633 3.708689969 1.474457846 3.305266794 1.993896485
## [116] 2.832705608 3.515096871 1.279004326 -0.272400201 3.139851774
## [121] 2.601644120 3.665667964 0.271425626 3.618607885 2.144880645
## [126] 4.445766383 2.523612002 -0.020189260 -0.257353206 -0.145147876
## [131] -0.047247099 2.050614013 1.236013310 2.363416859 2.517244585
## [136] 1.304038810 1.917367420 -1.211608141 0.428109438 4.346467012
## [141] 3.788015986 2.093734014 -1.588739174 3.909932624 6.463161197
## [146] 3.468100432 2.779234339 1.676909458 1.675912605 0.690178805
## [151] 3.250445641 2.144752442 0.617494189 3.585437557 0.206888255
## [156] 3.203807411 4.440939895 1.280856587 1.935435715 4.178268818
## [161] 1.262791599 0.272436452 2.928181335 -0.492347346 2.018337993
## [166] -0.730428992 0.997378204 1.572415724 -1.457216895 3.518809718
## [171] 1.663995567 1.068353486 0.300325269 1.030573957 0.308612800
## [176] 0.699477267 -0.153392950 4.030240483 -0.194282410 1.165441111
## [181] 1.641423348 2.488442296 0.741316155 0.856488470 0.983337798
## [186] 2.083313483 1.570658083 1.905182556 0.461582624 3.497110274
## [191] 0.659806586 1.354965996 3.476212143 2.173673922 2.386844337
## [196] 2.532199310 1.236225597 1.106821765 1.036577506 -0.923559008
## [201] -0.053306284 0.619580407 1.339366374 0.474729949 4.055617949
## [206] 0.171897568 1.798803505 2.640163492 1.102006198 2.213618030
## [211] 2.904938322 2.105417090 2.671740080 2.892075649 2.396420297
## [216] 0.931163012 -0.105280531 4.169012377 1.416835465 2.743818708
## [221] 1.022452138 3.196422030 4.057218674 0.418284821 4.070606396
## [226] 1.566327480 1.971362382 2.212321251 1.325151358 0.817347620
## [231] 0.702017185 0.575768065 3.359805982 2.448653822 2.628997705
## [236] 1.033070397 0.502434249 1.309088383 0.147361924 1.553261239
## [241] 1.543415280 1.841584929 0.545868640 2.684525553 0.671906639
## [246] 3.370868886 3.766572555 1.458995962 -1.192609842 3.133190955
## [251] -0.253741954 3.731545695 3.156001676 2.019016098 3.081962525
## [256] 0.100097260 2.065700847 -1.344194409 1.107828410 1.292434102
## [261] -0.249759471 1.671808251 0.870730135 2.751599332 4.565996911
## [266] 2.555980169 1.374525175 3.437746432 0.512168458 3.349913109
## [271] 2.077407561 2.323326595 1.681436741 0.405728801 2.850494583
## [276] 2.917843674 -0.640816317 3.744387143 0.882666789 2.784893779
## [281] 1.293912914 2.871666767 -1.931946562 2.576898384 2.182307034
## [286] 0.409494306 2.941600253 1.969838494 1.505428559 1.984665864
## [291] 0.779161449 1.151433270 4.417826017 3.019182127 4.821058864
## [296] 0.903414285 0.775890111 2.548923544 2.023319588 -1.283316974
## [301] 2.843334388 3.791127537 2.727501758 0.084800737 3.762286605
## [306] 1.906066477 3.647685143 3.318479599 3.363670088 0.112869548
## [311] 3.696904778 2.670190665 1.806064861 2.465276520 2.808989959
## [316] 0.468075074 4.215663510 4.242839821 3.156593306 2.928239489
## [321] 1.356616528 3.156794451 0.423533038 2.242986577 3.661551815
## [326] 2.629650327 3.165818882 2.452213535 1.232440687 -1.133389292
## [331] 0.894224538 2.823904596 1.935928037 3.483511182 3.832543702
## [336] -0.861916168 4.984598540 1.952361582 0.286865821 0.055158082
## [341] 2.379040529 -0.173660490 3.225836552 2.208381300 3.188691651
## [346] 1.048714756 2.161081977 3.130581308 2.267401776 2.576000817
## [351] 1.061350289 2.562822617 1.779872724 2.581195842 3.305822463
## [356] 1.054408858 3.532968681 3.293229925 0.893107325 2.122795738
## [361] 5.362675129 1.431438747 2.335042709 0.688480279 2.162196027
## [366] 3.354258502 3.123758426 1.564255673 3.604707524 1.207751502
## [371] 2.834967156 2.818033594 2.372260733 0.855656311 1.970700172
## [376] 3.464764762 3.996491909 -1.006815847 6.077779644 1.171913635
## [381] 2.183911892 -0.409136348 0.540803440 2.892210365 -2.313830834
## [386] 3.287515102 1.228894555 2.416861505 3.218405279 0.442600495
## [391] 1.152121761 1.918816634 5.085136509 2.340981436 0.225363416
## [396] 2.650111441 1.546065239 3.416400116 3.728335967 -0.075835543
## [401] 2.662689019 3.348521888 0.656007574 1.851563159 4.367323559
## [406] 4.260037384 2.485114422 4.649729924 3.455070252 4.500497842
## [411] 2.737772064 0.839881779 0.411234736 1.403309507 2.016034317
## [416] 3.089654806 2.740801133 0.718235196 1.689392058 -1.138564402
## [421] 2.162500079 -1.396105805 3.841785089 0.321492204 1.744290455
## [426] 1.121264753 2.007073041 3.553109837 1.145926270 2.717221687
## [431] 1.731559338 1.864233634 1.088270411 2.904283375 3.460662548
## [436] 2.882144395 0.712056808 2.015545388 1.925089917 0.951316625
## [441] 2.073535970 0.918360691 3.034638140 1.800058214 4.711403469
## [446] 4.406282623 2.523212245 0.256268959 -0.377925330 1.721799075
## [451] -1.267460795 0.765756189 -1.844186864 1.501848507 2.604277963
## [456] 1.470494218 0.280247815 2.598111005 0.993362799 0.173576505
## [461] 1.978208313 2.759458714 4.540381778 3.806814572 0.205926391
## [466] 0.293934955 3.381173766 1.808457183 -0.962907672 3.846865721
## [471] -0.255110394 3.274892071 0.024715089 2.629875730 1.929529854
## [476] 1.861949536 3.271939473 4.778326882 2.916302346 1.928689723
## [481] -0.738310412 1.940751337 3.349450242 3.947046256 1.474226154
## [486] 1.232188009 2.076782926 2.930108487 1.132746521 4.002752759
## [491] 0.321609212 3.446949147 0.327071081 2.832617373 2.116345770
## [496] 1.506431092 2.945092837 1.784839602 1.804973631 0.678844833
## [501] 2.878389541 1.957052172 0.495954231 1.463548172 2.997808291
## [506] 4.599522815 1.593848958 0.734987043 1.088179772 4.276039815
## [511] 2.706992830 0.419563916 -0.190828394 4.646634545 3.867677116
## [516] 1.091423082 2.565232361 -0.235310586 2.088105950 3.838892117
## [521] 0.780392103 3.497348544 1.761181256 5.664401532 3.086202407
## [526] 0.237233981 1.260898700 2.359870674 3.155885377 1.948759564
## [531] 0.058906615 2.625769585 3.771159289 2.937258998 2.608707807
## [536] 2.182464355 0.995502397 0.135115007 3.389874103 2.650406508
## [541] -0.102808221 -0.709460990 -0.000895197 3.327990687 1.307480922
## [546] -0.365220801 1.840558866 0.764029148 1.525026772 1.861289791
## [551] 1.700814355 1.501580131 2.544489507 0.070328639 1.337052387
## [556] 1.747570131 -1.961627736 2.543923457 0.688791416 0.590444108
## [561] 0.991633753 -0.712132747 3.447999136 1.882484164 1.811347425
## [566] 1.525523472 1.229467285 2.499544151 5.048437995 -0.411702768
## [571] 0.186052120 -0.011130375 2.838464256 1.976884315 4.100665838
## [576] 0.382058766 0.714654180 2.715702938 1.532748053 2.610324391
## [581] 0.048376161 1.557858427 4.829675682 1.797138555 1.872398867
## [586] 2.524812567 2.217701927 4.182107597 3.323807812 0.522046580
## [591] 3.535104646 3.141316692 2.764213808 2.629983972 1.501340855
## [596] 0.836505885 2.994686360 2.046504073 2.335098988 -1.068560461
## [601] 2.705439912 1.217405755 2.515929565 1.927540380 0.041056053
## [606] 1.831137493 1.346638256 1.419562581 1.661246639 1.686114906
## [611] 2.641105090 0.674673905 3.800677471 -0.341894144 3.229826960
## [616] 0.203270730 1.489295518 1.944794185 2.426837501 3.667799911
## [621] 0.994648176 0.953452542 5.038023383 3.045969100 2.018308240
## [626] 2.366316862 1.259191369 2.974882685 0.829283681 0.909215385
## [631] -1.588698039 0.369177288 0.959466944 4.233636130 2.588661533
## [636] 2.628723817 2.531673808 5.008195310 1.715487272 1.561939861
## [641] 2.262866501 -0.628305334 4.966383293 0.201094803 -0.097409016
## [646] 1.980623907 3.463161811 2.827707279 1.632127096 1.689881266
## [651] 2.938860775 3.169826417 2.545262334 2.167451102 0.786746408
## [656] 1.174433777 1.808151768 2.256765490 1.664318428 3.682083871
## [661] 2.389032358 2.349755998 -0.316002973 3.890885197 0.917535810
## [666] 2.600264759 2.111546785 1.802785877 1.066589924 3.110543119
## [671] 3.249189635 3.119623030 0.064578764 1.829429137 2.848358930
## [676] 0.787331179 1.560382276 0.262667467 3.995782210 1.226899920
## [681] 0.954651938 3.281487925 4.820415336 1.317514774 3.846599592
## [686] 0.862624931 0.455424282 1.372588601 4.194724673 -0.101345479
## [691] 1.776637517 0.699565481 4.004800586 1.141184270 1.015499072
## [696] 3.517647772 2.067272037 3.621754447 1.009258632 3.389087903
## [701] 1.654625426 -0.417774552 1.330332661 2.009449879 3.260185754
## [706] 3.132367066 5.699472625 3.102995560 2.392441905 1.976636615
## [711] 0.022718604 2.330169903 3.657076702 0.335034298 0.760166814
## [716] -0.892107845 -0.302705447 1.022199649 3.052578522 2.837881222
## [721] 3.811639561 0.851294720 1.560873560 0.925834282 1.339061536
## [726] 3.036356649 1.303416732 2.233078576 1.114745665 1.687871325
## [731] 1.621385816 1.407710551 3.118722979 1.796508610 2.027289620
## [736] -1.809367161 0.051189795 4.480775023 4.566314411 3.424903022
## [741] 2.499482605 0.824793547 0.642472669 1.599328476 4.835008001
## [746] 2.030676848 2.794320392 0.868820988 1.710283919 0.691529042
## [751] 0.242669611 3.454259522 0.900568465 2.153030232 3.154458308
## [756] 2.618647669 -0.128283894 3.858113671 4.305470978 0.150789955
## [761] 0.149280943 3.231025452 2.490085283 2.364096756 1.025135514
## [766] -1.349241952 -0.888870583 2.400487766 4.010400404 1.431773539
## [771] 1.717793346 -0.140235195 2.001632755 2.569915583 2.312406889
## [776] -0.625889938 0.515663447 1.344223977 2.582920357 5.672484519
## [781] -0.361624579 3.445994720 2.892019826 1.367538088 2.723323294
## [786] 2.768136212 1.150169930 2.209184760 0.819797175 3.945740488
## [791] 1.718827671 0.795124310 0.958613619 2.674885325 0.417610814
## [796] 1.174482868 1.438898803 5.886622714 2.926234357 0.087958317
## [801] 1.623470599 1.533653330 3.476138694 3.169000434 4.771219860
## [806] 0.778234687 3.889638582 1.414590238 0.117138741 2.181539213
## [811] -0.661019573 0.751673110 1.808823976 0.374194549 2.569979866
## [816] -0.174426580 1.191995778 3.305484321 2.376210440 2.451157066
## [821] 0.980142935 3.207755831 3.695241347 -0.383217533 1.476030197
## [826] 0.114510144 1.432213397 4.528917088 2.117178451 5.436893940
## [831] 1.765185751 0.650668795 1.150474106 1.603678349 2.257212133
## [836] 3.289144223 0.646940511 2.632740355 2.251310403 3.309551358
## [841] 1.422059392 3.854038267 3.872250175 2.094830423 1.146041018
## [846] 3.358589013 2.094312586 3.111984773 3.488821377 4.019374806
## [851] 1.567745303 2.772197966 -1.013556737 2.153606827 2.950993778
## [856] 3.917008184 3.627466561 1.865695279 1.780475376 1.781725953
## [861] 1.821037581 1.039892447 3.114531811 0.176677749 0.798862070
## [866] 2.861147184 4.561355659 3.731107757 -0.365523288 1.346407789
## [871] 1.165260384 1.618972903 0.189977420 1.282540302 4.104951561
## [876] 2.575291324 2.205068718 3.248253596 2.786400610 3.195006755
## [881] 3.116829636 0.053566156 2.472377938 2.175234647 1.928495765
## [886] 2.090010895 2.555103661 3.151785408 0.927427743 3.279757393
## [891] 1.723281943 1.106739803 0.924129074 2.106332642 0.486134510
## [896] 4.415798461 1.902221146 4.081812035 3.566409293 2.550826797
## [901] 1.300978814 1.482402924 3.686837507 3.519402761 0.254214540
## [906] 1.632264519 1.980333499 1.032125969 3.876461701 2.592056554
## [911] 1.975759087 3.774132624 2.096028789 2.310212253 3.256699084
## [916] 3.219783287 2.279374775 3.844981400 1.903301043 -1.268651118
## [921] 6.970824368 3.306811878 1.551328966 0.477019187 3.466386799
## [926] 2.539686910 2.149895310 1.440751350 4.791105288 0.859221992
## [931] -0.301622557 2.878786464 0.271319347 3.078591379 1.864334536
## [936] 3.323954774 2.379379256 2.042749414 2.662382839 2.837101919
## [941] 2.810634533 -0.493273204 3.218320455 0.293255144 3.317604916
## [946] 0.097899605 2.304556468 1.172094090 3.527187917 4.100455219
## [951] 3.239234413 4.156748333 1.097566170 4.048763858 2.389237594
## [956] -0.460610156 2.767930096 5.921997961 2.445210337 0.761204027
## [961] 3.536785948 0.948118280 0.968642769 3.483214865 2.107232174
## [966] 1.078639321 -1.460499136 1.522383881 2.951275503 -1.402121121
## [971] 1.929560683 3.203583387 3.554220046 2.739899372 4.078741644
## [976] 2.402984864 1.456365335 4.432085104 1.970794771 3.726039895
## [981] 2.289259145 4.197047367 2.961089323 1.589875594 1.074357706
## [986] -0.128333360 4.190446670 0.249575920 0.337000090 2.713827964
## [991] 2.050379684 -1.687441594 1.922818558 1.697657346 2.016235719
## [996] 4.993716801 2.720917316 -0.430803163 1.681529728 -0.384191759
summary(data)
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## -4.049 1.006 2.136 2.059 3.228 6.572
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## -2.3138 0.9883 1.9793 1.9859 3.0830 6.9708
subtitle <- "This is my second title"
maintitle <- paste0("Histogram and Density Plot \n",subtitle)
hist(data, breaks=20,col="lightgreen",main = maintitle)
# Add density curve (define the range of the density curve)
x = seq(from=min(data), to=max(data), length.out=100)
norm_dist = dnorm(x, mean=mean(data), sd=sd(data)) * (max(data)-min(data))/ 20*length(data)
lines(x, norm_dist, col='red',lwd=4)
abline(v = mean(data), col="black", lwd=3, lty=2)
# Add legend
legend("topright", # Add legend to plot
legend = c("Histogram", "density curve", "Average"),
col = c("lightgreen", "red", "black"),
lty = 1)
# Locate lowest 5% and highest 5% of the data
quantile(data,prob = 0.05)
## 5%
## -0.6290623
## 5%
## -0.3832662
abline(v = quantile(data,prob = 0.05), col="red", lwd=3, lty=3)
# Area to the left of the red line is lowest 5% of the data
quantile(data,prob = 0.95)
## 95%
## 4.660368
## 95%
## 4.307521
abline(v = quantile(data,prob = 0.95), col="blue", lwd=3, lty=3)

# Area to the right of the blue line is top 5% of the data
# Area in between the red line and the blue line is 90%
# of the data
# How to get the values (lowest 5%)
(Cutoff <- quantile(data,prob = 0.05))
## 5%
## -0.6290623
## 5%
## -0.3832662
# mark those values that is lower than -.42 as true
# and higher than -.42 as false
(Low5Percent <- (data < Cutoff))
## [1] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [13] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [25] FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [37] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE
## [49] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE
## [61] FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [73] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [85] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [97] FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE
## [109] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [121] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [133] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [145] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [157] FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [169] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [181] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [193] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [205] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [217] FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE
## [229] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [241] FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [253] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [265] FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE
## [277] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [289] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE
## [301] FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [313] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [325] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [337] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [349] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [361] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [373] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [385] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [397] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [409] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [421] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [433] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [445] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [457] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [469] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [481] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [493] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [505] FALSE FALSE FALSE FALSE FALSE TRUE TRUE FALSE FALSE FALSE FALSE FALSE
## [517] FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE
## [529] FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE
## [541] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE
## [553] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [565] FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE
## [577] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [589] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [601] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [613] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE TRUE
## [625] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [637] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [649] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [661] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [673] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [685] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [697] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [709] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [721] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE
## [733] FALSE FALSE FALSE FALSE FALSE TRUE TRUE FALSE FALSE FALSE FALSE FALSE
## [745] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [757] FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [769] FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE
## [781] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [793] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [805] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE TRUE FALSE FALSE
## [817] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [829] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [841] FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [853] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [865] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [877] FALSE FALSE TRUE TRUE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE
## [889] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [901] FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE TRUE FALSE FALSE
## [913] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [925] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [937] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [949] FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE
## [961] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [973] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [985] FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [997] FALSE FALSE FALSE FALSE
## [1] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE TRUE FALSE
## [13] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [25] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [37] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE
## [49] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [61] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [73] FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [85] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE
## [97] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [109] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [121] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [133] FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE TRUE FALSE
## [145] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [157] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE TRUE FALSE FALSE
## [169] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [181] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [193] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [205] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [217] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [229] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [241] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE
## [253] FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE
## [265] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [277] TRUE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE
## [289] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [301] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [313] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [325] FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE TRUE
## [337] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [349] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [361] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [373] FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE TRUE FALSE FALSE
## [385] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [397] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [409] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [421] FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [433] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [445] FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE TRUE FALSE FALSE FALSE
## [457] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [469] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [481] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [493] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [505] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [517] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [529] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [541] FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [553] FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE TRUE FALSE FALSE
## [565] FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE
## [577] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [589] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [601] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [613] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [625] FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE
## [637] FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE
## [649] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [661] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [673] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [685] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [697] FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE
## [709] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [721] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [733] FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [745] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [757] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE TRUE FALSE
## [769] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [781] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [793] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [805] FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE
## [817] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [829] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [841] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [853] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [865] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [877] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [889] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [901] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [913] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [925] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [937] FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE
## [949] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [961] FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE TRUE FALSE FALSE
## [973] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [985] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [997] FALSE TRUE FALSE TRUE
# count all true values using the sum command
sum(Low5Percent[TRUE]) # there are 50 of them
## [1] 50
## [1] 50
# filter those 50 values that are smaller than the cutoff
data[Low5Percent==TRUE]
## [1] -0.6576320 -2.2069181 -0.8030475 -1.7454416 -1.9746642 -0.7260704
## [7] -2.1169077 -1.9800800 -1.1396456 -1.1905782 -1.0205173 -1.6932875
## [13] -4.0488165 -1.1359142 -1.1245956 -1.7824241 -1.3524800 -0.8971109
## [19] -1.0152979 -0.8946496 -3.4533834 -1.7961420 -1.2958279 -0.6683970
## [25] -0.7719644 -2.8423183 -1.4745292 -1.0730405 -1.4458454 -1.8261280
## [31] -1.1933137 -3.3697884 -1.4128243 -1.7465243 -1.3130372 -1.2141514
## [37] -3.5971151 -1.1958939 -0.9705633 -0.7394443 -2.6282020 -0.8261715
## [43] -1.3584999 -1.0715633 -1.1590171 -0.7345395 -0.7629452 -1.0540898
## [49] -1.0438257 -0.8676131
## [1] -1.5035094 -0.5724505 -0.3855397 -1.4241322 -0.7354679 -1.2116081
## [7] -1.5887392 -0.4923473 -0.7304290 -1.4572169 -0.9235590 -1.1926098
## [13] -1.3441944 -0.6408163 -1.9319466 -1.2833170 -1.1333893 -0.8619162
## [19] -1.0068158 -0.4091363 -2.3138308 -1.1385644 -1.3961058 -1.2674608
## [25] -1.8441869 -0.9629077 -0.7383104 -0.7094610 -1.9616277 -0.7121327
## [31] -0.4117028 -1.0685605 -1.5886980 -0.6283053 -0.4177746 -0.8921078
## [37] -1.8093672 -1.3492420 -0.8888706 -0.6258899 -0.6610196 -1.0135567
## [43] -1.2686511 -0.4932732 -0.4606102 -1.4604991 -1.4021211 -1.6874416
## [49] -0.4308032 -0.3841918
# How to get the top 5%
(Cutoff <- quantile(data,prob = 0.95))
## 95%
## 4.660368
## 95%
## 4.307521
(Top5Percent <- (data >= Cutoff))
## [1] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [13] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [25] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE
## [37] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [49] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [61] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [73] FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [85] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [97] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [109] TRUE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [121] FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE
## [133] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [145] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [157] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [169] FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE TRUE FALSE TRUE FALSE
## [181] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE
## [193] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE
## [205] FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [217] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [229] FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [241] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [253] FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [265] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [277] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [289] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [301] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [313] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [325] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [337] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [349] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [361] FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [373] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [385] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE
## [397] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE
## [409] FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE
## [421] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [433] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [445] FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [457] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [469] FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE
## [481] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [493] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE
## [505] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [517] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [529] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [541] FALSE TRUE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [553] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE
## [565] FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE
## [577] FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE TRUE
## [589] FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [601] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [613] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [625] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [637] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [649] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [661] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [673] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [685] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [697] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [709] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [721] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE
## [733] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [745] FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [757] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [769] FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE
## [781] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [793] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [805] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [817] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [829] FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [841] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE
## [853] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE TRUE
## [865] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [877] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [889] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [901] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [913] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [925] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [937] FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [949] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [961] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [973] FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE TRUE FALSE TRUE
## [985] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [997] FALSE FALSE FALSE FALSE
## [1] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [13] FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE
## [25] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [37] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE
## [49] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [61] FALSE FALSE TRUE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [73] FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [85] FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [97] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [109] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [121] FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE
## [133] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [145] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [157] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [169] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [181] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [193] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [205] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [217] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [229] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [241] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [253] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [265] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [277] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [289] FALSE FALSE FALSE FALSE TRUE FALSE TRUE FALSE FALSE FALSE FALSE FALSE
## [301] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [313] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [325] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [337] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [349] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [361] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [373] FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE
## [385] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE
## [397] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE TRUE
## [409] FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [421] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [433] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [445] TRUE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [457] FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE
## [469] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE
## [481] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [493] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [505] FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE
## [517] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [529] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [541] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [553] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [565] FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [577] FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE
## [589] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [601] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [613] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE
## [625] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [637] FALSE TRUE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE
## [649] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [661] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [673] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE
## [685] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [697] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE
## [709] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [721] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [733] FALSE FALSE FALSE FALSE FALSE TRUE TRUE FALSE FALSE FALSE FALSE FALSE
## [745] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [757] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [769] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [781] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [793] FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE
## [805] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [817] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [829] FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [841] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [853] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [865] FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [877] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [889] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [901] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [913] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE
## [925] FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [937] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [949] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE
## [961] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [973] FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE
## [985] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [997] FALSE FALSE FALSE FALSE
sum(Top5Percent[TRUE]) # counts all the true values
## [1] 50
## [1] 50
data[Top5Percent==TRUE]
## [1] 5.005790 5.219907 5.327919 4.955671 4.718576 5.549166 4.804582 5.423395
## [9] 6.099058 4.975725 5.228674 5.307734 5.452916 5.052645 5.101065 5.014890
## [17] 5.005573 4.676074 5.562172 5.923051 5.330435 4.968450 4.895423 4.679101
## [25] 5.609404 5.743822 4.671716 4.952948 5.197270 5.407111 5.449710 4.817355
## [33] 5.322201 5.227293 4.738465 5.357644 5.562215 5.494186 5.099263 5.323517
## [41] 5.074902 6.572345 5.338694 5.248385 4.723675 4.906609 5.173936 5.218272
## [49] 5.112010 4.661879
## [1] 4.860585 5.010959 4.608968 5.872728 4.452515 4.937083 4.636531 4.445766
## [9] 4.346467 6.463161 4.440940 4.565997 4.417826 4.821059 4.984599 5.362675
## [17] 6.077780 5.085137 4.367324 4.649730 4.500498 4.711403 4.406283 4.540382
## [25] 4.778327 4.599523 4.646635 5.664402 5.048438 4.829676 5.038023 5.008195
## [33] 4.966383 4.820415 5.699473 4.480775 4.566314 4.835008 5.672485 5.886623
## [41] 4.771220 4.528917 5.436894 4.561356 4.415798 6.970824 4.791105 5.921998
## [49] 4.432085 4.993717