## Write an R function called Cleaner that accepts a single vector of numbers

1. Write an R function called Cleaner that accepts a single vector of numbers that may contain NA entries and returns a vector where the NA’s have been replaced with -1.
2. Write an R function that accepts three parameters: a lower bound, an upper bound, and an increment. Then use a repeat loop to generate a vector of the numbers from the lower bound to the upper bound by increment.
For example, if my function was called counter
[1] 2 4 6 8 10
i.e. the numbers from 2 to 10 in increments of 2
[1] 2 5 8
3. Assuming I have three variables called lower, upper, and increment, how could I produce the same thing as number 2 with a single R statement that does not employ a loop?
4. Write an R function that accepts two parameters: a vector of strings and a single search character. The function will then return a vector that contains the input strings that contain the search character.

For Example, if my function was called searcher
names <- c(“Bob”, “Bill”, “William”,”Tom”)
[1] “Bill” “William”

1. Write an R function that accepts three parameters: a vector of strings, a single search character, and a single replacement character. The function will return the vector of strings, but with all instances of the search character replaced with the replacement character.
For example, if my function was called replacer
names <- c(“Bob”, “Bill”, “William”,”Tom”)
[1] “BOb” “Bill” “William” “TOm"

``# Question 5``

byday <- table(FM\$Date)

# Average Number of Songs ListenedTo Over the Time Priod

avsongs <- mean(byday)
avsongs

# Maximum Songs Listened To per Day

max(byday)

## I have provided you with an Excel spreadsheet called Last_FM_data_shuffled.xlsx

I have provided you with an Excel spreadsheet called Last_FM_data_shuffled.xlsx. It contains the log of all the music I have listened to on my phone since I began using the Last.fm website. As the name implies however, I have shuffled the entries so that they are no longer in chronological order. There is a header row at the top of the spreadsheet, and there are four columns of data: Band, Album, Song, and Date.

1. Assuming you are not using packages that let you read from Excel, what must you do first in order to prepare this data to import to an R dataframe? What command will you use to import it?
For this problem, submit a .r file where the first line is a comment telling me what you have to do, and the second line is the R command to import the data. Remember that # is the comment character.
2. What is a single R command that can be used to count how many different bands are represented in the data file?
3. Write an R script that will sort the data back into chronological order and store it in a new dataframe.
4. Recall that the table() function can be used to quickly summarize data. As an example, assuming I have attached the dataframe with the song data, I can type

And get the following output

Song
(Song For My) Sugar Spun Sister 1901 45

``````                          2                        1               2

50 Ways to Say Goodbye     6th Avenue Heartache      8:02:00 PM
1                        2               1 ``````

Each song title appears as a column heading and the number underneath it represents the number of time the song appears in the Song column of the dataframe.
Using this, what is the R command to determine the name of the song that has been played the most times? What is the R command to determine how many times that song has been played?

1. Using R, determine the average number of songs I listened to per day over the time period in the dataset.

## General Instructions

15 questions. The first 12 are fill-in-the-blank/short-answer type questions, while the final three require you to manipulate a dataset. You should have 4 Total files

For problems 13-15, assume that your script and the data file are both located in the current working directory. Therefore, when you read a file in, there is no need to provide a path, just the filename. For example:

When you are asked to write a function, all the information that function needs to operate should be included in the parameters. Thus, there should be no user input involved in the function itself.
For questions which ask you to produce a plot, you may use either base R plotting or ggplot2, whichever you prefer. Your plots should have appropriately labeled axes.

1. Given a vector x:
x <- c(4,6,5,7,10,9,4,15)

What R command could I use to find out how many entries in X are less than 7?

1. Complete the following R command to generate a vector of the integers from 1:10

x <- 1______

1. What is the default separator character in the paste() function?
2. A categorical variable with a fixed number of levels is a _________________.
3. _ changes the class of a variable, if possible.
4. What function do you use in R to add a column to a matrix or data frame?
5. Given the vector y:
y <- c(101,85,97,102,76,89,95,94,90,80,82,75,103,100,79,69)

What R command could I use to replace any value greater than 100 with 100?

1. Write a short R function called getNames that accepts two parameters called namesVector and excludeCharacter and returns all the entries in namesVector that DO NOT contain excludeCharacter.
2. Would the following data be considered WIDE or LONG?
Control Treatment Preheated Treatment Prechilled Treatment
6.1 6.3 7.1
5.9 6.2 8.2
5.8 5.8 7.3
5.4 6.3 6.9
3. Given a matrix x, what R command would I type to return all the columns in row 5?
4. Given two vectors:
x <- c(3,2,4)
y <- c(1,2)

The command z <- x*y will produce a vector z that contains (3,4,4). Explain why this happens.

1. Write a short R function called replaceMean that accepts a parameter called numberData and returns a vector where any missing data has been replaced with the mean of data. For example
x <- c(1.2, 7.9, 3.4, NA, 4.2, 9.1, NA)
z <- replaceMean(x)
z would now contain (1.2, 7.9, 3.4, 5.16, 4.2, 9.1, 5.16)
2. I have provided you with a dataset in the file MetroMedian.csv. The file contains the median price per square foot of housing in each of the nation’s largest 557 metropolitan areas from April 1996 through December 2016. There are a number of missing entries where the data was not available.
a. Read this file into a dataframe called metro
b. This data is not correctly formatted. Produce a dataframe called tidyMetro that is suitable for analysis.
c. For the entire data set, what is the mean value for the STATE of New York? Show both the R command(s) and the result
d. Write an R function that accepts two parameters called valueFrame and searchRegion and returns the mean value for all entries for that region.
3. I have provided you with a dataset in the file BeachWaterQualiy.csv. The file contains the bacterial count results from New York beaches from May 2005 to May 2016.
a. Read this file into a dataframe called beaches
b. When there was no detectable level of bacteria, the Results field was left blank. These fields were read into the dataframe as NA. Write a single line of R to replace any NA values in the Results column with 0 (zero).
c. The sample dates recorded in this dataset are not suitable for ordering the data chronologically. Add a column to the beaches dataframe called new.date that is suitable for sorting.
d. Write an R function called beachPlot that accepts three parameters called beachData, beachName, and sampleLocation. Your function should produce a line plot of the sample results for the named beach and sample location. For example, if I were to call
beachPlot(beaches, “MANHATTAN BEACH”, “Center”)
the function would return a plot that looked similar to

You may assume the dataframe being passed into the function has a column with a sortable date, but you cannot assume that the dataframe is chronologically sorted.

1. I have provided you with a dataset in the file insight.csv. This is the mileage data (again) for my Honda Insight.
a. Read this file into a dataframe called mileage
b. Produce and label a scatterplot with blue points that puts Average Temperature on the x-axis and MPG on the y-axis
c. Add a blue line that fits a linear model
d. Add red points the put Average Temperature on the x-axis and the “car.said” mileage on the y-axis
e. Add a red line that fits a linear model
f. Add a legend that tells me which points are “Measured MPG” and which points are “Car Reported MPG”. You can specify the location of the legend or let the user select it, whichever you wish.

A datafile containing all the values has been attached here with;-
R.docx

## Dissertation Empirical Analysis Project

1. Plot the cross-sectional average of deposits/assets and Non-Deposit Debt/assets across time.

You can calculate Non-Deposit Debt = Assets – Deposits – Equity. How have the averages
evolved? How would you interpret your results?

1. Run OLS regressions of quarterly loan growth on non-deposit debt/assets (one quarter lagged value) controlling for bank size (i.e. one quarter lagged natural logarithm of total asset) and
profitability (i.e. one quarter lagged return on assets) for the sub-sample of your data during the
financial crisis (i.e. 2008Q1 – 2010Q1). You should have Bank and Time fixed effects in your
regression. What is the sign and magnitude of the co-efficient on non-deposit debt/assets? Is the
coefficient significant? How will you interpret the co-efficient? Justify your findings.
2. Compute two measures / (ex-post) proxies for bank risk
a. Risk weighted asset divided by total assets
b. Non-performing loans divided by total loans
3. Plot the cross-sectional average of the above two measures across time. How have the averages
evolved across years? How would you interpret your results?
4. Run OLS regressions of the two ex-post measures of bank risk on equity over assets (one
quarter lagged values). Control for bank size (i.e. one quarter lagged natural logarithm of total
asset) and profitability (i.e. one quarter lagged return on assets) on the entire sample. You
should have Bank and Time fixed effects in your regression. What is the sign and magnitude of
the co-efficient on equity/assets? Is the coefficient significant? How will you interpret the coefficient? Justify your findings.
Note: Make sure you winsorize all your variables (per quarter at the 1st and 99th percentile) to
remove outliers.