viniciusmss

viniciusmss

viniciusmss

viniciusmss

######### RUN THE CODE BELOW IN R. R-STUDIO IS THE RECOMMENDED IDE. BOTH R AND R-STUDIO ARE FREE.
######### QUESTIONS SHOULD BE POSTED TO PIAZZA
######### THE ACTUAL ASSIGNMENT BEGINS ON LINE 71


### Multilateral Development Institution Data
foo <- read.csv("https://tinyurl.com/yb4phxx8") # read in the data

# column names
names(foo)

viniciusmss

######### RUN THE CODE BELOW IN R. R-STUDIO IS THE RECOMMENDED IDE. BOTH R AND R-STUDIO ARE FREE.
######### QUESTIONS SHOULD BE POSTED TO PIAZZA
######### THE ACTUAL ASSIGNMENT BEGINS ON LINE 71


### Multilateral Development Institution Data
foo <- read.csv("https://tinyurl.com/yb4phxx8") # read in the data

# column names
names(foo)

viniciusmss

######### RUN THE CODE BELOW IN R. R-STUDIO IS THE RECOMMENDED IDE. BOTH R AND R-STUDIO ARE FREE.
######### QUESTIONS SHOULD BE POSTED TO PIAZZA
######### THE ACTUAL ASSIGNMENT BEGINS ON LINE 71


### Multilateral Development Institution Data
foo <- read.csv("https://tinyurl.com/yb4phxx8") # read in the data

# column names
names(foo)

viniciusmss

viniciusmss

viniciusmss

### Arbitrarily define some simple data-generating process ("DGP"):
X = c(1:100)

set.seed(9876) # this sets the random seed, ensuring replicability
irreducible_error <- rnorm(100)

# Here's the data-generating process ("DGP")
Y <- 10*X + 500*irreducible_error

data_set <- data.frame(X, Y)

viniciusmss

######### The local regression part begins at line 84

### Arbitrarily define some simple data-generating process ("DGP"):
X = c(1:100)

set.seed(9876) # this sets the random seed, ensuring replicability
irreducible_error <- rnorm(100)

# Here's the data-generating process ("DGP")
Y <- 10*X + 500*irreducible_error