Week12_assignment
Jamey Etherton
Tuesday, April 28, 2015
This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see http://rmarkdown.rstudio.com.
When you click the Knit button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:
library(rmongodb)## Warning: package 'rmongodb' was built under R version 3.1.3library(knitr)## Warning: package 'knitr' was built under R version 3.1.3mongodb <- mongo.create(host="127.0.0.1")
(mongo.get.database.collections(mongodb,'test'))## [1] "test.messages" "test.bank_data"#Get checking accounts only
account <- mongo.bson.from.JSON('{"last_name":"SMITH"}')
data <- mongo.find(mongodb,"test.bank_data", account)
bank_data.df <- mongo.cursor.to.data.frame(data)## Warning in mongo.cursor.to.data.frame(data): This fails for most NoSQL
## data structures. I am working on a new solutionsummary(bank_data.df)## first_name last_name accounts.account_type accounts.account_balance
## JAMES : 1 SMITH:100 Savings :26 Min. : 149839
## MICHAEL: 1 Checking :23 1st Qu.:2551715
## ROBERT : 1 Investment:24 Median :5251813
## WILLIAM: 1 401K :27 Mean :5097260
## DAVID : 1 3rd Qu.:7534086
## JOHN : 1 Max. :9938200
## (Other):94
## accounts.currency accounts.currency.1 accounts.account_type.1
## PESO :19 USD :17 Checking :22
## YEN :19 PESO :12 401K :23
## POUNDS STERLING:15 YUAN :13 Investment:22
## YUAN :17 EURO :15 Savings :22
## EURO :20 POUNDS STERLING:18 NA's :11
## USD :10 YEN :14
## NA's :11
## accounts.account_balance.1 accounts.account_balance.2
## Min. : 177683 Min. : 40574
## 1st Qu.:3901437 1st Qu.:2970476
## Median :6169913 Median :5401547
## Mean :5630387 Mean :5329331
## 3rd Qu.:8132059 3rd Qu.:7948735
## Max. :9896871 Max. :9929287
## NA's :11 NA's :24
## accounts.currency.2 accounts.account_type.2 accounts.account_type.3
## EURO : 9 Investment:22 Investment:16
## USD : 9 Savings :18 Checking :10
## PESO :15 401K :22 401K :20
## POUNDS STERLING:14 Checking :14 Savings :22
## YUAN :12 NA's :24 NA's :32
## YEN :17
## NA's :24
## accounts.account_balance.3 accounts.currency.3
## Min. : 321561 PESO :16
## 1st Qu.:2582684 YUAN :15
## Median :5483865 USD : 8
## Mean :5184301 POUNDS STERLING:13
## 3rd Qu.:7565161 EURO : 5
## Max. :9723364 YEN :11
## NA's :32 NA's :32
## accounts.currency.4 accounts.account_type.4
## EURO : 9 Investment:19
## YEN : 9 Checking :12
## PESO : 6 Savings :21
## USD :15 401K : 8
## YUAN : 9 NA's :40
## POUNDS STERLING:12
## NA's :40
## accounts.account_balance.4 accounts.account_type.5
## Min. : 496816 Savings :12
## 1st Qu.:2191930 Investment: 7
## Median :5423019 Checking :14
## Mean :5024242 401K :18
## 3rd Qu.:8074082 NA's :49
## Max. :9792224
## NA's :40
## accounts.account_balance.5 accounts.currency.5
## Min. : 75792 YUAN : 6
## 1st Qu.:2479360 USD : 7
## Median :5976664 YEN :14
## Mean :5361998 POUNDS STERLING: 9
## 3rd Qu.:7739892 EURO :11
## Max. :9907912 PESO : 4
## NA's :49 NA's :49
## accounts.account_type.6 accounts.account_balance.6
## 401K : 9 Min. : 18680
## Investment:12 1st Qu.:2048657
## Checking : 9 Median :5136100
## Savings :10 Mean :4649290
## NA's :60 3rd Qu.:6329173
## Max. :9867640
## NA's :60
## accounts.currency.6 accounts.account_type.7
## EURO : 9 Investment:11
## PESO : 7 Checking : 5
## YEN : 7 401K : 9
## POUNDS STERLING: 7 Savings : 6
## USD : 5 NA's :69
## YUAN : 5
## NA's :60
## accounts.account_balance.7 accounts.currency.7
## Min. : 643055 YEN : 6
## 1st Qu.:5073540 POUNDS STERLING: 5
## Median :6558148 EURO : 8
## Mean :5831357 PESO : 5
## 3rd Qu.:7676592 YUAN : 2
## Max. :8811182 USD : 5
## NA's :69 NA's :69
## accounts.account_type.8 accounts.account_balance.8
## Investment: 4 Min. : 424046
## 401K : 4 1st Qu.:4033928
## Checking : 3 Median :5149552
## Savings : 4 Mean :5227528
## NA's :85 3rd Qu.:6361969
## Max. :9769410
## NA's :85
## accounts.currency.8
## EURO : 3
## POUNDS STERLING: 3
## YEN : 5
## PESO : 3
## YUAN : 1
## NA's :85
## str(bank_data.df)## 'data.frame': 100 obs. of 29 variables:
## $ first_name : Factor w/ 100 levels "JAMES","MICHAEL",..: 1 2 3 4 5 6 7 8 9 10 ...
## $ last_name : Factor w/ 1 level "SMITH": 1 1 1 1 1 1 1 1 1 1 ...
## $ accounts.account_type : Factor w/ 4 levels "Savings","Checking",..: 1 2 3 4 1 4 2 3 1 4 ...
## $ accounts.account_balance : num 8995952 2819064 3465277 2497139 8857597 ...
## $ accounts.currency : Factor w/ 6 levels "PESO","YEN","POUNDS STERLING",..: 1 2 1 1 3 4 5 5 2 1 ...
## $ accounts.currency.1 : Factor w/ 6 levels "USD","PESO","YUAN",..: 1 1 1 2 1 2 3 4 4 1 ...
## $ accounts.account_type.1 : Factor w/ 4 levels "Checking","401K",..: 1 1 2 1 1 2 3 2 4 4 ...
## $ accounts.account_balance.1: num 3901437 4131942 6001520 405606 471237 ...
## $ accounts.account_balance.2: num NA 3782509 1739276 9149016 2834734 ...
## $ accounts.currency.2 : Factor w/ 6 levels "EURO","USD","PESO",..: NA 1 2 3 2 1 3 4 4 5 ...
## $ accounts.account_type.2 : Factor w/ 4 levels "Investment","Savings",..: NA 1 1 1 1 2 1 3 1 3 ...
## $ accounts.account_type.3 : Factor w/ 4 levels "Investment","Checking",..: NA 1 2 3 3 1 3 4 2 4 ...
## $ accounts.account_balance.3: num NA 6531887 7704685 8797914 6177092 ...
## $ accounts.currency.3 : Factor w/ 6 levels "PESO","YUAN",..: NA 1 2 2 3 4 5 4 2 4 ...
## $ accounts.currency.4 : Factor w/ 6 levels "EURO","YEN","PESO",..: NA 1 NA NA NA 1 2 3 4 1 ...
## $ accounts.account_type.4 : Factor w/ 4 levels "Investment","Checking",..: NA 1 NA NA NA 1 2 3 4 3 ...
## $ accounts.account_balance.4: num NA 2105928 NA NA NA ...
## $ accounts.account_type.5 : Factor w/ 4 levels "Savings","Investment",..: NA 1 NA NA NA 2 3 NA 4 1 ...
## $ accounts.account_balance.5: num NA 4612959 NA NA NA ...
## $ accounts.currency.5 : Factor w/ 6 levels "YUAN","USD","YEN",..: NA 1 NA NA NA 2 3 NA 1 4 ...
## $ accounts.account_type.6 : Factor w/ 4 levels "401K","Investment",..: NA NA NA NA NA 1 2 NA NA NA ...
## $ accounts.account_balance.6: num NA NA NA NA NA ...
## $ accounts.currency.6 : Factor w/ 6 levels "EURO","PESO",..: NA NA NA NA NA 1 2 NA NA NA ...
## $ accounts.account_type.7 : Factor w/ 4 levels "Investment","Checking",..: NA NA NA NA NA 1 2 NA NA NA ...
## $ accounts.account_balance.7: num NA NA NA NA NA ...
## $ accounts.currency.7 : Factor w/ 6 levels "YEN","POUNDS STERLING",..: NA NA NA NA NA 1 2 NA NA NA ...
## $ accounts.account_type.8 : Factor w/ 4 levels "Investment","401K",..: NA NA NA NA NA 1 NA NA NA NA ...
## $ accounts.account_balance.8: num NA NA NA NA NA ...
## $ accounts.currency.8 : Factor w/ 5 levels "EURO","POUNDS STERLING",..: NA NA NA NA NA 1 NA NA NA NA ...head(bank_data.df)## first_name last_name accounts.account_type accounts.account_balance
## 1 JAMES SMITH Savings 8995952
## 2 MICHAEL SMITH Checking 2819064
## 3 ROBERT SMITH Investment 3465277
## 4 WILLIAM SMITH 401K 2497139
## 5 DAVID SMITH Savings 8857597
## 6 JOHN SMITH 401K 9059210
## accounts.currency accounts.currency.1 accounts.account_type.1
## 1 PESO USD Checking
## 2 YEN USD Checking
## 3 PESO USD 401K
## 4 PESO PESO Checking
## 5 POUNDS STERLING USD Checking
## 6 YUAN PESO 401K
## accounts.account_balance.1 accounts.account_balance.2
## 1 3901436.6 NA
## 2 4131942.3 3782509
## 3 6001520.4 1739276
## 4 405606.1 9149016
## 5 471237.5 2834734
## 6 5926514.1 8172877
## accounts.currency.2 accounts.account_type.2 accounts.account_type.3
## 1 <NA> <NA> <NA>
## 2 EURO Investment Investment
## 3 USD Investment Checking
## 4 PESO Investment 401K
## 5 USD Investment 401K
## 6 EURO Savings Investment
## accounts.account_balance.3 accounts.currency.3 accounts.currency.4
## 1 NA <NA> <NA>
## 2 6531887 PESO EURO
## 3 7704685 YUAN <NA>
## 4 8797914 YUAN <NA>
## 5 6177092 USD <NA>
## 6 4320375 POUNDS STERLING EURO
## accounts.account_type.4 accounts.account_balance.4
## 1 <NA> NA
## 2 Investment 2105928
## 3 <NA> NA
## 4 <NA> NA
## 5 <NA> NA
## 6 Investment 9159979
## accounts.account_type.5 accounts.account_balance.5 accounts.currency.5
## 1 <NA> NA <NA>
## 2 Savings 4612959 YUAN
## 3 <NA> NA <NA>
## 4 <NA> NA <NA>
## 5 <NA> NA <NA>
## 6 Investment 8923438 USD
## accounts.account_type.6 accounts.account_balance.6 accounts.currency.6
## 1 <NA> NA <NA>
## 2 <NA> NA <NA>
## 3 <NA> NA <NA>
## 4 <NA> NA <NA>
## 5 <NA> NA <NA>
## 6 401K 3810782 EURO
## accounts.account_type.7 accounts.account_balance.7 accounts.currency.7
## 1 <NA> NA <NA>
## 2 <NA> NA <NA>
## 3 <NA> NA <NA>
## 4 <NA> NA <NA>
## 5 <NA> NA <NA>
## 6 Investment 1803757 YEN
## accounts.account_type.8 accounts.account_balance.8 accounts.currency.8
## 1 <NA> NA <NA>
## 2 <NA> NA <NA>
## 3 <NA> NA <NA>
## 4 <NA> NA <NA>
## 5 <NA> NA <NA>
## 6 Investment 4947925 EUROcolnames(bank_data.df)## [1] "first_name" "last_name"
## [3] "accounts.account_type" "accounts.account_balance"
## [5] "accounts.currency" "accounts.currency.1"
## [7] "accounts.account_type.1" "accounts.account_balance.1"
## [9] "accounts.account_balance.2" "accounts.currency.2"
## [11] "accounts.account_type.2" "accounts.account_type.3"
## [13] "accounts.account_balance.3" "accounts.currency.3"
## [15] "accounts.currency.4" "accounts.account_type.4"
## [17] "accounts.account_balance.4" "accounts.account_type.5"
## [19] "accounts.account_balance.5" "accounts.currency.5"
## [21] "accounts.account_type.6" "accounts.account_balance.6"
## [23] "accounts.currency.6" "accounts.account_type.7"
## [25] "accounts.account_balance.7" "accounts.currency.7"
## [27] "accounts.account_type.8" "accounts.account_balance.8"
## [29] "accounts.currency.8"kable(bank_data.df[c(1,2,3,4,5)], row.names=NA, output=TRUE)| first_name | last_name | accounts.account_type | accounts.account_balance | accounts.currency |
|---|---|---|---|---|
| JAMES | SMITH | Savings | 8995952.2 | PESO |
| MICHAEL | SMITH | Checking | 2819063.9 | YEN |
| ROBERT | SMITH | Investment | 3465277.4 | PESO |
| WILLIAM | SMITH | 401K | 2497138.7 | PESO |
| DAVID | SMITH | Savings | 8857597.1 | POUNDS STERLING |
| JOHN | SMITH | 401K | 9059210.2 | YUAN |
| RICHARD | SMITH | Checking | 714872.3 | EURO |
| THOMAS | SMITH | Investment | 936130.5 | EURO |
| JOSEPH | SMITH | Savings | 4622864.1 | YEN |
| CHARLES | SMITH | 401K | 7959552.7 | PESO |
| PAUL | SMITH | Checking | 936484.1 | YUAN |
| KENNETH | SMITH | Investment | 8984765.6 | YEN |
| DANIEL | SMITH | 401K | 8382349.4 | PESO |
| CHRISTOPHER | SMITH | Savings | 1870338.6 | POUNDS STERLING |
| DONALD | SMITH | Savings | 9075817.3 | YUAN |
| GEORGE | SMITH | Checking | 7510049.7 | PESO |
| MARK | SMITH | Savings | 521640.4 | USD |
| STEVEN | SMITH | Investment | 7606194.2 | EURO |
| BRIAN | SMITH | 401K | 149839.1 | PESO |
| ANTHONY | SMITH | Savings | 8436439.2 | POUNDS STERLING |
| EDWARD | SMITH | 401K | 6577381.4 | YEN |
| KEVIN | SMITH | Savings | 3309735.7 | YEN |
| RONALD | SMITH | Investment | 2493283.6 | YUAN |
| MATTHEW | SMITH | Checking | 7306262.4 | YUAN |
| JASON | SMITH | Savings | 9144369.8 | YEN |
| GARY | SMITH | Checking | 1689550.6 | YEN |
| TIMOTHY | SMITH | 401K | 2750672.6 | YUAN |
| JOSE | SMITH | Investment | 6609320.6 | YUAN |
| JEFFREY | SMITH | Checking | 6530548.1 | EURO |
| LARRY | SMITH | Investment | 3759078.7 | USD |
| FRANK | SMITH | Savings | 3391089.6 | YUAN |
| ERIC | SMITH | Checking | 5708037.5 | YUAN |
| SCOTT | SMITH | 401K | 1473176.2 | EURO |
| STEPHEN | SMITH | Investment | 2355138.7 | PESO |
| ANDREW | SMITH | Investment | 6564642.1 | PESO |
| JOSHUA | SMITH | 401K | 2576445.1 | POUNDS STERLING |
| JERRY | SMITH | Checking | 5356347.3 | EURO |
| DENNIS | SMITH | Savings | 778479.9 | USD |
| PATRICK | SMITH | Checking | 8379175.3 | POUNDS STERLING |
| WALTER | SMITH | Investment | 1532954.0 | YEN |
| PETER | SMITH | Checking | 2945775.1 | POUNDS STERLING |
| HAROLD | SMITH | Checking | 8160498.5 | EURO |
| DOUGLAS | SMITH | Investment | 3191154.0 | USD |
| GREGORY | SMITH | Savings | 2569907.0 | YUAN |
| RAYMOND | SMITH | Checking | 7154717.1 | YUAN |
| ARTHUR | SMITH | Investment | 4981246.3 | PESO |
| HENRY | SMITH | Checking | 6730721.2 | POUNDS STERLING |
| RYAN | SMITH | 401K | 9938199.8 | PESO |
| JUAN | SMITH | Investment | 6171950.8 | PESO |
| CARL | SMITH | 401K | 2062347.0 | EURO |
| JOE | SMITH | Investment | 1895471.7 | PESO |
| ROGER | SMITH | 401K | 796487.5 | PESO |
| JUSTIN | SMITH | 401K | 6019867.7 | POUNDS STERLING |
| JACK | SMITH | 401K | 5754928.0 | YEN |
| GERALD | SMITH | 401K | 1255474.3 | USD |
| ALBERT | SMITH | Investment | 4821991.3 | YUAN |
| JONATHAN | SMITH | Checking | 2913395.4 | EURO |
| KEITH | SMITH | Checking | 6690685.2 | YEN |
| SAMUEL | SMITH | Investment | 8703552.0 | POUNDS STERLING |
| RALPH | SMITH | Checking | 1433428.0 | YEN |
| LAWRENCE | SMITH | 401K | 6998458.8 | YUAN |
| NICHOLAS | SMITH | 401K | 9417729.0 | EURO |
| TERRY | SMITH | Investment | 5010024.7 | YUAN |
| BRUCE | SMITH | 401K | 592785.4 | USD |
| ROY | SMITH | 401K | 7355824.3 | YEN |
| BRANDON | SMITH | Investment | 5393645.2 | PESO |
| ADAM | SMITH | Savings | 5597781.2 | YEN |
| WILLIE | SMITH | Savings | 5106783.1 | POUNDS STERLING |
| WAYNE | SMITH | Checking | 8718134.7 | PESO |
| BILLY | SMITH | 401K | 8691011.5 | USD |
| BENJAMIN | SMITH | Checking | 5717579.0 | EURO |
| LOUIS | SMITH | Savings | 9305130.3 | EURO |
| JEREMY | SMITH | Investment | 701598.9 | POUNDS STERLING |
| AARON | SMITH | Savings | 1455321.8 | EURO |
| RANDY | SMITH | 401K | 9405881.1 | POUNDS STERLING |
| HOWARD | SMITH | Investment | 3746059.2 | POUNDS STERLING |
| FRED | SMITH | Checking | 5803698.0 | POUNDS STERLING |
| EUGENE | SMITH | Savings | 814479.4 | YEN |
| RUSSELL | SMITH | Savings | 5147278.8 | PESO |
| CARLOS | SMITH | 401K | 7008538.8 | PESO |
| HARRY | SMITH | Investment | 3203404.2 | YEN |
| STEVE | SMITH | 401K | 3826231.0 | YEN |
| VICTOR | SMITH | Investment | 1563523.8 | EURO |
| MARTIN | SMITH | 401K | 7241112.0 | YEN |
| ERNEST | SMITH | Savings | 7908379.6 | USD |
| PHILLIP | SMITH | Checking | 9015319.1 | EURO |
| TODD | SMITH | Savings | 6811081.9 | USD |
| JESSE | SMITH | 401K | 6228235.0 | YUAN |
| CRAIG | SMITH | Savings | 4225179.9 | EURO |
| SHAWN | SMITH | Investment | 3880964.9 | YEN |
| CLARENCE | SMITH | Savings | 671709.0 | PESO |
| SEAN | SMITH | Checking | 3938606.3 | USD |
| CHRIS | SMITH | Investment | 9920646.1 | YUAN |
| JOHNNY | SMITH | Savings | 8446771.8 | EURO |
| PHILIP | SMITH | Savings | 9636237.4 | POUNDS STERLING |
| EARL | SMITH | Savings | 4258860.1 | EURO |
| ALAN | SMITH | Savings | 9689557.4 | YUAN |
| BOBBY | SMITH | 401K | 1294682.1 | EURO |
| JIMMY | SMITH | Checking | 4140390.0 | YEN |
| ANTONIO | SMITH | 401K | 5958257.4 | EURO |
You can also embed plots, for example:
Note that the echo = FALSE parameter was added to the code chunk to prevent printing of the R code that generated the plot.