IMDb movie data #### 1). Copy the url "http://homepages.uc

#### 7). Draw a scatter plot of "log(budget)" vs. "log(gross)". You need to first create new variable "log(budget)".

```{r, message=FALSE, fig.align='center'} # add new variable "log(budget)"

# scatter plot of "log(budget)" vs. "log(gross)" ggplot(movie1, aes(x=, y=)) + geom_point(color="red") ```

#### 8). On top of (7), add a straight line (use black color) and a smooth curve (use green color, and dashed line).

```{r, message=FALSE, fig.align='center'} ggplot(movie1, aes(x=, y=)) + ```