Publications by Wilson Chau
Data 621 Homework 5
Overview In this homework assignment, you will explore, analyze and model a data set containing information on approximately 12,000 commercially available wines. The variables are mostly related to the chemical properties of the wine being sold. The response variable is the number of sample cases of wine that were purchased by wine distribution com...
5511 sym R (3587 sym/13 pcs) 3 img 1 tbl
Data 621 homework 4
#Introduction library(tidyverse) ## ── Attaching packages ─────────────────────────────────────── tidyverse 1.3.2 ── ## ✔ ggplot2 3.4.3 ✔ purrr 0.3.4 ## ✔ tibble 3.1.8 ✔ dplyr 1.0.10 ## ✔ tidyr 1.2.1 ✔ stringr 1.4.0 ## ✔ readr...
1684 sym R (1418066 sym/26 pcs) 3 img
Data 621 Assignment 3
#Libraries for Homework 3 library(tidyverse) ## ── Attaching packages ─────────────────────────────────────── tidyverse 1.3.2 ── ## ✔ ggplot2 3.4.4 ✔ purrr 0.3.5 ## ✔ tibble 3.2.1 ✔ dplyr 1.1.3 ## ✔ tidyr 1.2.1 ✔ stringr 1.5.0 ## ✔...
3326 sym R (9628 sym/33 pcs) 3 img 1 tbl
Data 621 Homework 2
#Homework #2 Library output: library(tidyverse) ## ── Attaching packages ─────────────────────────────────────── tidyverse 1.3.2 ── ## ✔ ggplot2 3.4.0 ✔ purrr 0.3.5 ## ✔ tibble 3.1.8 ✔ dplyr 1.0.10 ## ✔ tidyr 1.2.1 ✔ stringr 1.5....
3239 sym R (3558 sym/28 pcs) 2 img 2 tbl
Data 621 Assignment 1
Wilson Chau Data 621 Assignment 1 #Observation: baseball_data <- read.csv("https://raw.githubusercontent.com/Wilchau/Data_621_Assignment_1/main/moneyball-training-data.csv") baseball_eval <- read.csv("https://raw.githubusercontent.com/Wilchau/Data_621_Assignment_1/main/moneyball-evaluation-data.csv") str(baseball_data) ## 'data.frame': 2276 obs...
2210 sym R (17105 sym/19 pcs) 3 img
Data 605 Final Project Part 2
library(plotly) ## Loading required package: ggplot2 ## ## Attaching package: 'plotly' ## The following object is masked from 'package:ggplot2': ## ## last_plot ## The following object is masked from 'package:stats': ## ## filter ## The following object is masked from 'package:graphics': ## ## layout library(GGally) ## Registered S3...
3133 sym R (71209 sym/68 pcs) 3 img
Data 605 Final Project Part 1
library(tidyverse) ## ── Attaching packages ─────────────────────────────────────── tidyverse 1.3.2 ── ## ✔ ggplot2 3.4.0 ✔ purrr 0.3.5 ## ✔ tibble 3.1.8 ✔ dplyr 1.0.10 ## ✔ tidyr 1.2.1 ✔ stringr 1.5.0 ## ✔ readr 2.1.2 ...
1938 sym R (1783 sym/32 pcs) 3 img
Data 605 Discussion 13
#Question 10 Chapter 4.2 A boat is being pulled into a dock at a constant rate of 30ft/min by a winch located 10 above the deck of the boat. At what rate is the boat approaching the dock when the boat is: (a) 50 feet out? z <-50 dz_dt <- 30 z/(sqrt(z^2 - 100)) * dz_dt ## [1] 30.61862 15 feet out? z <-15 z/(sqrt(z^2 - 100)) * dz_dt ## [1] 40.2...
380 sym
data 605 Week 12
#Question Using R, build a multiple regression model for data that interests you. Include in this model at least one quadratic term, one dichotomous term, and one dichotomous vs. quantitative interaction term. Interpret all coefficients. Conduct residual analysis. Was the linear model appropriate? Why or why not? data("attitude") pairs(attitude) ...
862 sym 1 img
Data_605_Week_11_Discussion
library(tidyverse) ## ── Attaching packages ─────────────────────────────────────── tidyverse 1.3.2 ── ## ✔ ggplot2 3.4.0 ✔ purrr 0.3.5 ## ✔ tibble 3.1.8 ✔ dplyr 1.0.10 ## ✔ tidyr 1.2.1 ✔ stringr 1.5.0 ## ✔ readr 2.1.2 ...
13 sym R (994 sym/10 pcs)