(ONLY FOR PROF-HAYAT)
1. The following are patient satisfaction and quality scores for a specific clinic for five months.
satisfaction: {80,70,60,70,80}
quality: {60,70,60,80,70}
Build a dataframe with these two variables. Show the R code you used.
2. Create a subset from the data using the subset command where satsifaction and quality scores are both greater than 70. Show the R code you used.
3. The following code may be used to read a Yahoo Finance CSV file for MSFT stock into R directly. (I just used the hyperlink to the historical price freely available on the web at
http://finance.yahoo.com/q/hp?s=MSFT+Historical+Prices
. You could use any stock.
a=”
http://ichart.finance.yahoo.com/table.csv?s=MSFT&d=11&e=31&f=2012&g=d&a=2&b=13&c=1986&ignore=.csv
“
b=read.csv(a)
Generate a subset where all the closing prices are strictly greater than 30. Include the code.
Date | Open | High | Low | Close | Volume | Adj Close | ||||||||||||||||||||||||||
10/9/20 | 13 | 13.72 | 13.9 | 13.6 | 13.8 | 960 | 12 | |||||||||||||||||||||||||
10/8/2013 | 13.83 | 13.68 | 13.69 | 92746200 | ||||||||||||||||||||||||||||
10/7/2013 | 13.91 | 13.95 | 13.81 | 64822700 | ||||||||||||||||||||||||||||
10/4/2013 | 14 | 14.08 | 13.96 | 14.05 | 63495400 | |||||||||||||||||||||||||||
10/3/2013 | 14.07 | 14.1 | 95269000 | |||||||||||||||||||||||||||||
10/2/2013 | 13.79 | 14.06 | 88892800 | |||||||||||||||||||||||||||||
10/1/2013 | 13.85 | 13.92 | 57522500 | |||||||||||||||||||||||||||||
9/30/2013 | 13.93 | 104197800 | ||||||||||||||||||||||||||||||
9/27/2013 | 13.99 | 14.03 | 13.88 | 78953600 | ||||||||||||||||||||||||||||
9/26/2013 | 14.19 | 14.2 | 13.98 | 89174000 | ||||||||||||||||||||||||||||
9/25/2013 | 14.12 | 14.24 | 14.14 | 86450500 | ||||||||||||||||||||||||||||
9/24/2013 | 14.18 | 14.25 | 14.01 | 14.09 | 95931000 | |||||||||||||||||||||||||||
9/23/2013 | 14.3 | 14.32 | 126937500 | |||||||||||||||||||||||||||||
9/20/2013 | 14.6 | 14.66 | 14.4 | 14.44 | 144787300 | |||||||||||||||||||||||||||
9/19/2013 | 14.8 | 14.83 | 14.5 | 14.61 | 79487600 | |||||||||||||||||||||||||||
9/18/2013 | 14.53 | 14.82 | 14.49 | 14.7 | 127092600 | 14.71 | ||||||||||||||||||||||||||
9/17/2013 | 14.62 | 14.55 | 73489100 | |||||||||||||||||||||||||||||
9/16/2013 | 14.68 | 65276500 | ||||||||||||||||||||||||||||||
9/13/2013 | 14.46 | 14.45 | 56713000 | |||||||||||||||||||||||||||||
9/12/2013 | 14.65 | 14.48 | 63242900 | |||||||||||||||||||||||||||||
9/ | 11 | 14.56 | 14.52 | 80948200 | ||||||||||||||||||||||||||||
9/10/2013 | 14.69 | 93053500 | ||||||||||||||||||||||||||||||
9/9/2013 | 14.41 | 14.37 | 53301900 | |||||||||||||||||||||||||||||
9/6/2013 | 14.47 | 14.27 | 14.36 | 75404000 | ||||||||||||||||||||||||||||
9/5/2013 | 71229200 | |||||||||||||||||||||||||||||||
9/4/2013 | 14.21 | 71132500 | ||||||||||||||||||||||||||||||
9/3/2013 | 14.38 | 74628700 | ||||||||||||||||||||||||||||||
8/30/2013 | 14.23 | 73233400 | 14.11 | |||||||||||||||||||||||||||||
8/29/2013 | 14.17 | 7669 | 15 | 14.16 | ||||||||||||||||||||||||||||
8/28/2013 | 96473600 | |||||||||||||||||||||||||||||||
8/27/2013 | 14.26 | 122534200 | ||||||||||||||||||||||||||||||
8/26/2013 | 68938900 | |||||||||||||||||||||||||||||||
8/23/2013 | 14.59 | 14.51 | 14.57 | 67699200 | ||||||||||||||||||||||||||||
8/22/2013 | 76348300 | |||||||||||||||||||||||||||||||
8/21/2013 | 14.34 | 91680600 | 14.33 | |||||||||||||||||||||||||||||
8/20/2013 | 14.29 | 114332500 | 14.28 | |||||||||||||||||||||||||||||
8/19/2013 | 14.13 | 14.15 | 98384600 | |||||||||||||||||||||||||||||
8/16/2013 | 14.42 | 104959000 | ||||||||||||||||||||||||||||||
8/15/2013 | 14.31 | 99238900 | ||||||||||||||||||||||||||||||
8/14/2013 | 14.75 | 14.54 | 78553700 | |||||||||||||||||||||||||||||
8/13/2013 | 75777900 | |||||||||||||||||||||||||||||||
8/12/2013 | 60867500 | |||||||||||||||||||||||||||||||
8/9/2013 | 72897900 | |||||||||||||||||||||||||||||||
8/8/2013 | 88544100 | |||||||||||||||||||||||||||||||
8/7/2013 | 14.43 | 128693600 | ||||||||||||||||||||||||||||||
8/6/2013 | 14.74 | 14.76 | 14.63 | 14.64 | 84249800 | |||||||||||||||||||||||||||
8/5/2013 | 14.77 | 14.84 | 61711900 | 14.79 | ||||||||||||||||||||||||||||
8/2/2013 | 14.88 | 14.91 | 14.78 | 83367400 | ||||||||||||||||||||||||||||
8/1/2013 | 14.85 | 14.97 | 14.95 | 108554200 | 14.94 | |||||||||||||||||||||||||||
7/31/2013 | 14.58 | 128182500 | ||||||||||||||||||||||||||||||
7/30/2013 | 71675200 | |||||||||||||||||||||||||||||||
7/29/2013 | 88616700 | |||||||||||||||||||||||||||||||
7/26/2013 | 14.73 | 73777800 | 14.72 | |||||||||||||||||||||||||||||
7/25/2013 | 89243300 | |||||||||||||||||||||||||||||||
7/24/2013 | 117771100 | |||||||||||||||||||||||||||||||
7/23/2013 | 14.98 | 15.03 | 14.86 | 113736000 | 14.93 | |||||||||||||||||||||||||||
7/22/2013 | 14.99 | 14.92 | 112416800 | |||||||||||||||||||||||||||||
7/19/2013 | 136196600 | |||||||||||||||||||||||||||||||
7/18/2013 | 221796400 | |||||||||||||||||||||||||||||||
7/17/2013 | 14.04 | 249674500 | ||||||||||||||||||||||||||||||
7/16/2013 | 14.02 | 13.77 | 146041900 | |||||||||||||||||||||||||||||
7/15/2013 | 13.94 | 13.76 | 90765200 | 13.87 | ||||||||||||||||||||||||||||
7/12/2013 | 13.5 | 13.4 | 13.78 | 123958400 | ||||||||||||||||||||||||||||
7/11/2013 | 13.58 | 13.3 | 13.51 | 93756500 | ||||||||||||||||||||||||||||
7/10/2013 | 13.53 | 13.31 | 13.37 | 104353400 | 13.36 | |||||||||||||||||||||||||||
7/9/2013 | 13.2 | 106067300 | 13.52 | |||||||||||||||||||||||||||||
7/8/2013 | 13.1 | 13.08 | 13.28 | 107441200 | 13.27 | |||||||||||||||||||||||||||
7/5/2013 | 12.9 | 12.91 | 13.06 | 80758500 | 13.05 | |||||||||||||||||||||||||||
7/3/2013 | 12.8 | 12.84 | 12.73 | 12.83 | 37971700 | 12.82 | ||||||||||||||||||||||||||
7/2/2013 | 12.95 | 83708600 | 12.89 | |||||||||||||||||||||||||||||
7/1/2013 | 12.92 | 12.93 | 83146300 | |||||||||||||||||||||||||||||
6/28/2013 | 12.97 | 12.86 | 90297100 | 12.85 | ||||||||||||||||||||||||||||
6/27/2013 | 13.03 | 12.78 | 13.01 | 124616300 | ||||||||||||||||||||||||||||
6/26/2013 | 12.68 | 12.76 | 105282000 | 12.75 | ||||||||||||||||||||||||||||
6/25/2013 | 12.61 | 12.77 | 12.4 | 12.67 | 132844500 | 12.66 | ||||||||||||||||||||||||||
6/24/2013 | 12.45 | 12.1 | 12.3 | 159762500 | 12.2 | |||||||||||||||||||||||||||
6/21/2013 | 12.99 | 12.39 | 12.69 | 196004700 | ||||||||||||||||||||||||||||
6/20/2013 | 13.14 | 185741100 | 12.88 | |||||||||||||||||||||||||||||
6/19/2013 | 13.29 | 13.17 | 13.19 | 103850000 | 13.18 | |||||||||||||||||||||||||||
6/18/2013 | 13.22 | 13.34 | 67257600 | 13.26 | ||||||||||||||||||||||||||||
6/17/2013 | 13.13 | 13.21 | 115441500 | |||||||||||||||||||||||||||||
6/14/2013 | 13.23 | 13.24 | 13.07 | 101380700 | ||||||||||||||||||||||||||||
6/13/2013 | 103636400 | |||||||||||||||||||||||||||||||
6/12/2013 | 13.25 | 117289400 | ||||||||||||||||||||||||||||||
6/11/2013 | 13.11 | 13.12 | 106369100 | |||||||||||||||||||||||||||||
6/10/2013 | 13.49 | 13.55 | 104648500 | |||||||||||||||||||||||||||||
6/7/2013 | 13.33 | 13.39 | 13.15 | 13.38 | 121057300 | |||||||||||||||||||||||||||
6/6/2013 | 142361900 | |||||||||||||||||||||||||||||||
6/5/2013 | 13.45 | 13.09 | 185778900 | |||||||||||||||||||||||||||||
6/4/2013 | 13.67 | 130055400 | ||||||||||||||||||||||||||||||
6/3/2013 | 13.73 | 197168200 | ||||||||||||||||||||||||||||||
5/31/2013 | 13.65 | 13.66 | 160176100 | 13.64 | ||||||||||||||||||||||||||||
5/30/2013 | 13.43 | 153383400 | ||||||||||||||||||||||||||||||
5/29/2013 | 13.56 | 13.48 | 126397300 | 13.46 | ||||||||||||||||||||||||||||
5/28/2013 | 13.35 | 133553000 | ||||||||||||||||||||||||||||||
5/24/2013 | 83452600 | |||||||||||||||||||||||||||||||
5/23/2013 | 13.42 | 190522000 | ||||||||||||||||||||||||||||||
5/22/2013 | 174531500 | |||||||||||||||||||||||||||||||
5/21/2013 | 13.44 | 111810300 | ||||||||||||||||||||||||||||||
5/20/2013 | 88941700 | |||||||||||||||||||||||||||||||
5/17/2013 | 107335600 | 13.41 | ||||||||||||||||||||||||||||||
5/16/2013 | 13.32 | 117977000 | ||||||||||||||||||||||||||||||
5/15/2013 | 139728300 | |||||||||||||||||||||||||||||||
5/14/2013 | 13.04 | 13.02 | 154128100 | |||||||||||||||||||||||||||||
5/13/2013 | 12.98 | 94295600 | 12.96 | |||||||||||||||||||||||||||||
5/10/2013 | 12.94 | 87625100 | ||||||||||||||||||||||||||||||
5/9/2013 | 12.87 | 112952300 | ||||||||||||||||||||||||||||||
5/8/2013 | 149755400 | |||||||||||||||||||||||||||||||
5/7/2013 | 218248100 | |||||||||||||||||||||||||||||||
5/6/2013 | 12.36 | 265062800 | ||||||||||||||||||||||||||||||
5/3/2013 | 12.41 | 12.21 | 12.24 | 94322600 | 12.22 | |||||||||||||||||||||||||||
5/2/2013 | 12.17 | 12.05 | 12.19 | 76530500 | ||||||||||||||||||||||||||||
5/1/2013 | 12.27 | 12.08 | 12.14 | 88417800 | 12.12 | |||||||||||||||||||||||||||
4/30/2013 | 12.31 | 89362100 | 12.29 | |||||||||||||||||||||||||||||
4/29/2013 | 12.48 | 12.37 | 12.38 | 65432400 | ||||||||||||||||||||||||||||
4/26/2013 | 12.34 | 12.46 | 12.42 | 83093200 | ||||||||||||||||||||||||||||
4/25/2013 | 12.5 | 12.44 | 118694600 | |||||||||||||||||||||||||||||
4/24/2013 | 120624900 | |||||||||||||||||||||||||||||||
4/23/2013 | 11.9 | 12.16 | 12.07 | 176816000 | ||||||||||||||||||||||||||||
4/22/2013 | 11.6 | 11.7 | 11.5 | 11.72 | 88532300 | |||||||||||||||||||||||||||
4/19/2013 | 11.56 | 11.69 | 11.4 | 11.66 | 119792000 | 11.64 | ||||||||||||||||||||||||||
4/18/2013 | 11.61 | 11.65 | 11.2 | 11.44 | 220290500 | 11.42 | ||||||||||||||||||||||||||
4/17/2013 | 11.91 | 12.02 | 11.45 | 335408600 | 11.68 | |||||||||||||||||||||||||||
4/16/2013 | 12.28 | 147641900 | 12.26 | |||||||||||||||||||||||||||||
4/15/2013 | 12.32 | 11.97 | 11.98 | 176504300 | 11.96 | |||||||||||||||||||||||||||
4/12/2013 | 12.15 | 12.25 | 88191700 | |||||||||||||||||||||||||||||
4/11/2013 | 12.33 | 100241900 | ||||||||||||||||||||||||||||||
4/10/2013 | 105853900 | |||||||||||||||||||||||||||||||
4/9/2013 | 12.35 | 132365800 | 12.23 | |||||||||||||||||||||||||||||
4/8/2013 | 101419200 | |||||||||||||||||||||||||||||||
4/5/2013 | 11.67 | 12.01 | 141061900 | 11.95 | ||||||||||||||||||||||||||||
4/4/2013 | 11.8 | 11.99 | 11.94 | 117831400 | 11.92 | |||||||||||||||||||||||||||
4/3/2013 | 11.81 | 199765800 | 11.79 | |||||||||||||||||||||||||||||
4/2/2013 | 102626000 | 12.13 | ||||||||||||||||||||||||||||||
4/1/2013 | 86281600 | |||||||||||||||||||||||||||||||
3/28/2013 | 12.11 | 12.18 | 92013900 | |||||||||||||||||||||||||||||
3/27/2013 | 107177200 | |||||||||||||||||||||||||||||||
3/26/2013 | 135654700 | |||||||||||||||||||||||||||||||
3/25/2013 | 12.72 | 154320200 | ||||||||||||||||||||||||||||||
3/22/2013 | 12.62 | 12.56 | 101974400 | 12.54 | ||||||||||||||||||||||||||||
3/21/2013 | 12.71 | 12.55 | 12.57 | 154529400 | ||||||||||||||||||||||||||||
3/20/2013 | 12.79 | 219121700 | ||||||||||||||||||||||||||||||
3/19/2013 | 12.59 | 242939600 | ||||||||||||||||||||||||||||||
3/18/2013 | 189783300 | |||||||||||||||||||||||||||||||
3/15/2013 | 12.52 | 319019100 | ||||||||||||||||||||||||||||||
3/14/2013 | 115440000 | 12.09 | ||||||||||||||||||||||||||||||
3/13/2013 | 12.04 | 12.06 | 86216800 | |||||||||||||||||||||||||||||
3/12/2013 | 128134700 | |||||||||||||||||||||||||||||||
3/11/2013 | 106427800 | |||||||||||||||||||||||||||||||
3/8/2013 | 209777100 | |||||||||||||||||||||||||||||||
3/7/2013 | 212403800 | |||||||||||||||||||||||||||||||
3/6/2013 | 11.77 | 11.76 | 182557500 | |||||||||||||||||||||||||||||
3/5/2013 | 11.71 | 11.53 | 11.55 | 135869700 | ||||||||||||||||||||||||||||
3/4/2013 | 11.27 | 11.22 | 11.41 | 116436000 | 11.3 | |||||||||||||||||||||||||||
3/1/2013 | 11.1 | 11.02 | 11.34 | 189050700 | 11.32 | |||||||||||||||||||||||||||
2/28/2013 | 11.33 | 11.37 | 11.23 | 143546700 | 11.21 | |||||||||||||||||||||||||||
2/27/2013 | 11.15 | 11.36 | 147145400 | 11.28 | ||||||||||||||||||||||||||||
2/26/2013 | 11.12 | 11.03 | 11.13 | 173039600 | ||||||||||||||||||||||||||||
2/25/2013 | 10.98 | 206893900 | ||||||||||||||||||||||||||||||
2/22/2013 | 11.62 | 11.26 | 179268200 | |||||||||||||||||||||||||||||
2/21/2013 | 11.73 | 11.35 | 235532400 | 11.39 | ||||||||||||||||||||||||||||
2/20/2013 | 11.75 | 193466400 | ||||||||||||||||||||||||||||||
2/19/2013 | 170783400 | |||||||||||||||||||||||||||||||
2/15/2013 | 12.03 | 158242700 | ||||||||||||||||||||||||||||||
2/14/2013 | 144104800 | |||||||||||||||||||||||||||||||
2/13/2013 | 192742500 | |||||||||||||||||||||||||||||||
2/12/2013 | 11.87 | 11.78 | 232173900 | |||||||||||||||||||||||||||||
2/11/2013 | 11.86 | 103510800 | 11.83 | |||||||||||||||||||||||||||||
2/8/2013 | 145321100 | |||||||||||||||||||||||||||||||
2/7/2013 | 11.84 | 173209900 | ||||||||||||||||||||||||||||||
2/6/2013 | 11.93 | 173626800 | ||||||||||||||||||||||||||||||
2/5/2013 | 11.59 | 11.88 | 187785900 | 11.85 | ||||||||||||||||||||||||||||
2/4/2013 | 11.58 | 11.46 | 11.48 | 139733000 | ||||||||||||||||||||||||||||
2/1/2013 | 161141300 | |||||||||||||||||||||||||||||||
1/31/2013 | 97024700 | 11.29 | ||||||||||||||||||||||||||||||
1/30/2013 | 11.49 | 11.54 | 11.38 | 89130200 | ||||||||||||||||||||||||||||
1/29/2013 | 96824100 | |||||||||||||||||||||||||||||||
1/28/2013 | 11.43 | 91304200 | ||||||||||||||||||||||||||||||
1/25/2013 | 11.51 | 100171600 | ||||||||||||||||||||||||||||||
1/24/2013 | 127870800 | |||||||||||||||||||||||||||||||
1/23/2013 | 121638200 | |||||||||||||||||||||||||||||||
1/22/2013 | 11.09 | 137242700 | ||||||||||||||||||||||||||||||
1/18/2013 | 11.14 | 179971800 | 11.11 | |||||||||||||||||||||||||||||
1/17/2013 | 11.17 | 323622200 | 11.25 | |||||||||||||||||||||||||||||
1/16/2013 | 11.47 | 164579300 | ||||||||||||||||||||||||||||||
1/15/2013 | 126058300 | 11.52 | ||||||||||||||||||||||||||||||
1/14/2013 | 11.63 | 110032900 | ||||||||||||||||||||||||||||||
1/11/2013 | 146136700 | |||||||||||||||||||||||||||||||
1/10/2013 | 199964900 | |||||||||||||||||||||||||||||||
1/9/2013 | 335692000 | |||||||||||||||||||||||||||||||
1/8/2013 | 11.89 | 168461100 | ||||||||||||||||||||||||||||||
1/7/2013 | 201403500 | |||||||||||||||||||||||||||||||
1/4/2013 | 132601900 | |||||||||||||||||||||||||||||||
1/3/2013 | 157149700 | |||||||||||||||||||||||||||||||
1/2/2013 | 236021400 |