Data 1 House Prices.csv
library(lattice)
don <- read.csv("/Users/hannahpeterson/Documents/R stuff/HousePrices.csv")
summary(don)
## HomeID Price SqFt Bedrooms
## Min. : 1.00 Min. : 69100 Min. :1450 Min. :2.000
## 1st Qu.: 32.75 1st Qu.:111325 1st Qu.:1880 1st Qu.:3.000
## Median : 64.50 Median :125950 Median :2000 Median :3.000
## Mean : 64.50 Mean :130427 Mean :2001 Mean :3.023
## 3rd Qu.: 96.25 3rd Qu.:148250 3rd Qu.:2140 3rd Qu.:3.000
## Max. :128.00 Max. :211200 Max. :2590 Max. :5.000
## Bathrooms Offers Brick Neighborhood
## Min. :2.000 Min. :1.000 No :86 East :45
## 1st Qu.:2.000 1st Qu.:2.000 Yes:42 North:44
## Median :2.000 Median :3.000 West :39
## Mean :2.445 Mean :2.578
## 3rd Qu.:3.000 3rd Qu.:3.000
## Max. :4.000 Max. :6.000
sd(don$Price)
## [1] 26868.77
sd(don$SqFt)
## [1] 211.5724
head(don)
## HomeID Price SqFt Bedrooms Bathrooms Offers Brick Neighborhood
## 1 1 114300 1790 2 2 2 No East
## 2 2 114200 2030 4 2 3 No East
## 3 3 114800 1740 3 2 1 No East
## 4 4 94700 1980 3 2 3 No East
## 5 5 119800 2130 3 3 3 No East
## 6 6 114600 1780 3 2 2 No North
barchart(table(don$Neighborhood),horizontal=FALSE,xlab="Neighborhood",col="yellow")
Data 2 Direct Marketing.csv
don <- read.csv("/Users/hannahpeterson/Documents/R stuff/DirectMarketing.csv")
summary(don)
## Age Gender OwnHome Married Location
## Middle:508 Female:506 Own :516 Married:502 Close:710
## Old :205 Male :494 Rent:484 Single :498 Far :290
## Young :287
##
##
##
## Salary Children History Catalogs
## Min. : 10100 Min. :0.000 High :255 Min. : 6.00
## 1st Qu.: 29975 1st Qu.:0.000 Low :230 1st Qu.: 6.00
## Median : 53700 Median :1.000 Medium:212 Median :12.00
## Mean : 56104 Mean :0.934 NA's :303 Mean :14.68
## 3rd Qu.: 77025 3rd Qu.:2.000 3rd Qu.:18.00
## Max. :168800 Max. :3.000 Max. :24.00
## AmountSpent
## Min. : 38.0
## 1st Qu.: 488.2
## Median : 962.0
## Mean :1216.8
## 3rd Qu.:1688.5
## Max. :6217.0
sd(don$Salary)
## [1] 30616.31
sd(don$AmountSpent)
## [1] 961.0686
boxplot(don$AmountSpent,outline=FALSE,horizontal=TRUE,xlab="Amount Spent")
Data 3 Gender Discrimination.csv
don <- read.csv("/Users/hannahpeterson/Documents/R stuff/GenderDiscrimination.csv")
summary(don)
## Gender Experience Salary
## Female:140 Min. : 2.00 Min. : 53400
## Male : 68 1st Qu.: 7.00 1st Qu.: 66000
## Median :10.00 Median : 74000
## Mean :12.05 Mean : 79844
## 3rd Qu.:16.00 3rd Qu.: 88000
## Max. :39.00 Max. :194000
sd(don$Salary)
## [1] 22512.31
sd(don$Experience)
## [1] 7.314706
table(don$Gender)
##
## Female Male
## 140 68
barchart(table(don$Gender),horizontal=TRUE,ylab="Gender",col="maroon")
Data 4 Loan Data.csv
don <- read.csv("/Users/hannahpeterson/Documents/R stuff/LoanData.csv")
summary(don)
## Status Credit.Grade Amount Age
## Current:5186 HR :1217 Min. : 1000 Min. : 0.000
## Default: 75 E :1129 1st Qu.: 2025 1st Qu.: 2.000
## Late : 350 D : 927 Median : 3001 Median : 4.000
## C : 843 Mean : 4817 Mean : 4.504
## B : 553 3rd Qu.: 6000 3rd Qu.: 7.000
## AA : 451 Max. :25000 Max. :14.000
## (Other): 491
## Borrower.Rate Debt.To.Income.Ratio
## Min. :0.0000 Min. : 0.00
## 1st Qu.:0.1425 1st Qu.: 0.09
## Median :0.1950 Median : 0.16
## Mean :0.1937 Mean : 45.38
## 3rd Qu.:0.2500 3rd Qu.: 0.25
## Max. :0.4975 Max. :51280.07
##
boxplot(don$Debt.To.Income.Ratio,outline=FALSE,horizontal=TRUE,xlab="Debt to Income Ration")
Data 5 Financial Indicators.csv
don <- read.csv("/Users/hannahpeterson/Documents/R stuff/FinancialIndicators.csv")
summary(don)
## Company.Name Industry.Name
## @Road Inc : 1 Bank : 487
## 1-800 Contacts Inc : 1 Computer Software/Svcs: 395
## 1-800-ATTORNEY Inc : 1 Drug : 306
## 1-800-FLOWERS.COM : 1 Internet : 306
## 1mage Software Inc : 1 Medical Supplies : 261
## 1st Centennial Bancorp: 1 Financial Svcs. (Div.): 244
## (Other) :7106 (Other) :5113
## SIC Exchange Country Stock.Price
## Min. : 0 0 : 6 Foreign:1783 Min. : 0.00
## 1st Qu.:3533 AMS : 431 US :5329 1st Qu.: 2.15
## Median :4911 INDE: 12 Median : 12.40
## Mean :5000 NDQ :4607 Mean : 37.63
## 3rd Qu.:6720 NYS :1806 3rd Qu.: 27.68
## Max. :9975 OTC : 48 Max. :88500.00
## TSE : 202
## X..Chg.in.last.year Trading.Volume X..of.shares.outstanding
## Min. :-0.920000 Min. :0.000e+00 Min. : 0.0
## 1st Qu.:-0.010000 1st Qu.:1.115e+04 1st Qu.: 7.2
## Median : 0.000000 Median :7.400e+04 Median : 22.3
## Mean : 0.003768 Mean :7.523e+05 Mean : 100.4
## 3rd Qu.: 0.000000 3rd Qu.:2.793e+05 3rd Qu.: 57.9
## Max. : 2.000000 Max. :1.677e+09 Max. :13073.5
##
## Market.Cap Total.Debt Firm.Value
## Min. : 0.0 Min. : 0.0 Min. : 0.0
## 1st Qu.: 12.9 1st Qu.: 0.0 1st Qu.: 18.7
## Median : 132.9 Median : 5.5 Median : 172.8
## Mean : 2823.3 Mean : 1000.7 Mean : 3824.0
## 3rd Qu.: 938.4 3rd Qu.: 148.0 3rd Qu.: 1174.7
## Max. :370978.1 Max. :478539.0 Max. :741342.1
##
## Enterprise.Value Cash Revenues..Last.yr
## Min. : -9671.9 Min. : 0.00 Min. : 0.1
## 1st Qu.: 13.6 1st Qu.: 0.80 1st Qu.: 20.0
## Median : 142.3 Median : 12.70 Median : 143.3
## Mean : 3520.7 Mean : 303.30 Mean : 2341.9
## 3rd Qu.: 1057.2 3rd Qu.: 79.92 3rd Qu.: 882.3
## Max. :726014.1 Max. :122152.00 Max. :285222.0
## NA's :1887
## Trailing.12.mth.Revenues Current.PE Trailing.PE
## Min. : 0.1 Min. : 0.00 Min. : 0.00
## 1st Qu.: 25.1 1st Qu.: 14.66 1st Qu.: 13.88
## Median : 174.8 Median : 20.50 Median : 19.04
## Mean : 2520.3 Mean : 40.08 Mean : 40.53
## 3rd Qu.: 968.4 3rd Qu.: 32.66 3rd Qu.: 29.45
## Max. :325891.0 Max. :5270.50 Max. :28518.28
## NA's :1857 NA's :3011 NA's :3165
## Forward.EPS Forward.PE PEG.Ratio PBV.Ratio
## Min. : -30.26 Min. : 4.38 Min. : 0.120 Min. : 0.000
## 1st Qu.: 0.50 1st Qu.: 14.54 1st Qu.: 1.200 1st Qu.: 1.430
## Median : 1.33 Median : 18.18 Median : 1.700 Median : 2.290
## Mean : 3.15 Mean : 29.93 Mean : 2.644 Mean : 5.338
## 3rd Qu.: 2.30 3rd Qu.: 25.53 3rd Qu.: 2.377 3rd Qu.: 4.020
## Max. :4000.00 Max. :2710.00 Max. :234.240 Max. :863.650
## NA's :4433 NA's :4715 NA's :4934 NA's :1469
## PS.Ratio EV.EBIT EV.EBITDA
## Min. : 0.00 Min. : 0.070 Min. : 0.1
## 1st Qu.: 0.59 1st Qu.: 7.225 1st Qu.: 5.3
## Median : 1.44 Median : 10.540 Median : 8.1
## Mean : 18.40 Mean : 25.108 Mean : 135.7
## 3rd Qu.: 3.82 3rd Qu.: 16.790 3rd Qu.: 13.2
## Max. :27304.00 Max. :10638.300 Max. :455000.0
## NA's :1887 NA's :3321 NA's :3127
## EV..Invested.Capital Value.BV.of.Capital EV.Sales
## Min. :0.000e+00 Min. : 0.000 Min. : 0.01
## 1st Qu.:1.000e+00 1st Qu.: 1.240 1st Qu.: 0.73
## Median :2.000e+00 Median : 1.830 Median : 1.63
## Mean :6.964e+12 Mean : 3.411 Mean : 18.89
## 3rd Qu.:4.000e+00 3rd Qu.: 3.150 3rd Qu.: 3.87
## Max. :3.363e+16 Max. :332.000 Max. :33657.50
## NA's :1410 NA's :1369 NA's :1977
## EV..Trailing.Sales Growth.in.EPS..Last.5.years
## Min. : 0.01 Min. :-0.500
## 1st Qu.: 0.70 1st Qu.:-0.030
## Median : 1.50 Median : 0.070
## Mean : 14.22 Mean : 0.073
## 3rd Qu.: 3.41 3rd Qu.: 0.170
## Max. :7667.55 Max. : 0.950
## NA's :2143 NA's :4898
## Expected.Growth.in.EPS..next.5.years
## Min. :-0.130
## 1st Qu.: 0.100
## Median : 0.140
## Mean : 0.167
## 3rd Qu.: 0.200
## Max. : 0.950
## NA's :4566
## Expected.Growth.in.Revenues..next.5.years Growth.in.Revenue..last.year
## Min. :-0.430 Min. :-0.7500
## 1st Qu.: 0.060 1st Qu.: 0.0000
## Median : 0.090 Median : 0.0000
## Mean : 0.096 Mean : 0.1041
## 3rd Qu.: 0.120 3rd Qu.: 0.1500
## Max. : 0.800 Max. : 4.8600
## NA's :5663
## X3.yr.Regression.Beta Value.Line.Beta HiLo.risk
## Min. :-9.4800 Min. :0.0000 Min. :0.0200
## 1st Qu.: 0.0000 1st Qu.:0.5000 1st Qu.:0.1700
## Median : 0.4400 Median :0.8000 Median :0.2700
## Mean : 0.7639 Mean :0.8231 Mean :0.3299
## 3rd Qu.: 1.1900 3rd Qu.:1.1000 3rd Qu.:0.4400
## Max. : 9.6100 Max. :7.9000 Max. :1.0000
## NA's :893
## X3.yr.Standard.Deviation..Stock.Price. Reinvestment
## Min. : 0.000 Min. :-108003.3
## 1st Qu.: 0.000 1st Qu.: -0.9
## Median : 0.280 Median : 0.0
## Mean : 0.437 Mean : 288.4
## 3rd Qu.: 0.560 3rd Qu.: 2.9
## Max. :29.190 Max. :1977007.2
##
## Correlation Payout.Ratio Reinvestment.Rate ROE
## Min. :-0.690 Min. : 0.0000 0 : 153 Min. :-97.0000
## 1st Qu.: 0.190 1st Qu.: 0.0000 0.06 : 85 1st Qu.: -0.0400
## Median : 0.440 Median : 0.0000 0.02 : 76 Median : 0.0800
## Mean : 0.445 Mean : 0.2212 0.04 : 74 Mean : -0.2009
## 3rd Qu.: 0.700 3rd Qu.: 0.2900 0.03 : 73 3rd Qu.: 0.1400
## Max. : 2.430 Max. :34.8300 (Other):4764 Max. :246.3500
## NA's :2090 NA's :3011 NA's :1887 NA's :1369
## ROC Net.Margin Pre.tax.Operating.Margin
## 0.1 : 182 Min. :-414.000 Min. :-99.6100
## 0.12 : 173 1st Qu.: -0.100 1st Qu.: -0.0200
## 0.14 : 167 Median : 0.030 Median : 0.0900
## 0.11 : 162 Mean : -1.882 Mean : -0.8673
## 0.13 : 162 3rd Qu.: 0.080 3rd Qu.: 0.1900
## (Other):4379 Max. : 19.670 Max. : 1.0000
## NA's :1887 NA's :1887 NA's :1887
## Invested.Capital BV.of.Assets Non.cash.WC
## Min. :-15212.5 Min. : 0.0 Min. :-12205.0
## 1st Qu.: 2.3 1st Qu.: 10.3 1st Qu.: -0.6
## Median : 48.0 Median : 146.8 Median : 0.0
## Mean : 1687.8 Mean : 4889.1 Mean : 247.0
## 3rd Qu.: 392.9 3rd Qu.: 925.1 3rd Qu.: 24.7
## Max. :503605.0 Max. :1484101.0 Max. :430192.0
##
## Chg.in.non.cash.WC Net.Income EBIT
## Min. :-109004.3 Min. :-13996.0 Min. : -925.44
## 1st Qu.: 0.0 1st Qu.: -1.2 1st Qu.: -0.19
## Median : 0.0 Median : 1.8 Median : 13.74
## Mean : 281.7 Mean : 133.7 Mean : 399.75
## 3rd Qu.: 1.1 3rd Qu.: 33.1 3rd Qu.: 130.29
## Max. :1978006.0 Max. : 25330.0 Max. :99485.19
## NA's :1887
## EBIT.1.t. EBITDA FCFF
## Min. : -925.44 Min. : -537.44 Min. :-1976050.3
## 1st Qu.: -0.19 1st Qu.: 0.33 1st Qu.: -0.9
## Median : 10.65 Median : 20.68 Median : 6.9
## Mean : 280.61 Mean : 522.56 Mean : -111.2
## 3rd Qu.: 91.56 3rd Qu.: 171.11 3rd Qu.: 71.4
## Max. :81701.22 Max. :107870.19 Max. : 108003.3
## NA's :1887 NA's :1887 NA's :1887
## Eff.Tax.Rate Non.cash.WC.as...of.Revenues Cash.as...of.Firm.Value
## Min. :0.0000 Min. :-241.0000 Min. : 0.0000
## 1st Qu.:0.0000 1st Qu.: -0.0700 1st Qu.: 0.0200
## Median :0.0300 Median : 0.0600 Median : 0.0700
## Mean :0.1627 Mean : -0.2979 Mean : 0.2539
## 3rd Qu.:0.3400 3rd Qu.: 0.1700 3rd Qu.: 0.1700
## Max. :0.6000 Max. : 29.6500 Max. :369.5000
## NA's :1887 NA's :553
## Cash.as...of.Revenues Cash.as...of.Total.Assets Capital.Expenditures
## Min. : 0.000 Min. :0.0000 Min. : 0.00
## 1st Qu.: 0.020 1st Qu.:0.0200 1st Qu.: 0.00
## Median : 0.100 Median :0.0900 Median : 1.20
## Mean : 2.089 Mean :0.1985 Mean : 96.90
## 3rd Qu.: 0.360 3rd Qu.:0.2900 3rd Qu.: 18.82
## Max. :1369.000 Max. :1.0000 Max. :17909.00
## NA's :1857 NA's :719
## Depreciation SG.A.Expenses Trailing.Revenues
## Min. : 0.00 Min. : 0.00 Min. : 0.0
## 1st Qu.: 0.00 1st Qu.: 2.20 1st Qu.: 0.0
## Median : 1.60 Median : 13.90 Median : 48.5
## Mean : 90.23 Mean : 326.86 Mean : 1862.2
## 3rd Qu.: 19.00 3rd Qu.: 85.72 3rd Qu.: 516.4
## Max. :33750.00 Max. :51105.00 Max. :325891.0
##
## Trailing.Net.Income Dividends Intangible.Assets.Total.Assets
## Min. :-4365.0 Min. : 0.00 Min. :0.0000
## 1st Qu.: -0.6 1st Qu.: 0.00 1st Qu.:0.0000
## Median : 1.4 Median : 0.00 Median :0.0300
## Mean : 133.9 Mean : 46.41 Mean :0.1239
## 3rd Qu.: 30.9 3rd Qu.: 0.56 3rd Qu.:0.1900
## Max. :25330.0 Max. :10586.40 Max. :1.0000
## NA's :719
## Fixed.Assets.Total.Assets Market.D.E Market.Debt.to.Capital
## Min. :0.0000 Min. : 0.000 Min. :0.0000
## 1st Qu.:0.0200 1st Qu.: 0.000 1st Qu.:0.0000
## Median :0.1100 Median : 0.120 Median :0.1100
## Mean :0.2055 Mean : 6.249 Mean :0.1995
## 3rd Qu.:0.3100 3rd Qu.: 0.440 3rd Qu.:0.3000
## Max. :1.0000 Max. :8933.000 Max. :1.0000
## NA's :719 NA's :553 NA's :553
## Book.Debt.to.Capital Dividend.Yield Insider.Holdings
## Min. :0.0000 Min. :0.000000 Min. :0.000
## 1st Qu.:0.0000 1st Qu.:0.000000 1st Qu.:0.020
## Median :0.2100 Median :0.000000 Median :0.050
## Mean :0.2641 Mean :0.006947 Mean :0.102
## 3rd Qu.:0.4500 3rd Qu.:0.000000 3rd Qu.:0.110
## Max. :0.9900 Max. :3.540000 Max. :1.000
## NA's :1369 NA's :5673
## Institutional.Holdings
## Min. :0.0000
## 1st Qu.:0.0000
## Median :0.2000
## Mean :0.3185
## 3rd Qu.:0.6200
## Max. :1.0000
##
barchart(table(don$Expected.Growth.in.EPS..next.5.years),horizontal=FALSE,xlab="Expected Growth in EPS in the next 5 years",col="blue")
