Publications by Glen Dale Davis
DATA624 - Homework 1
library(fpp3) library(cowplot) library(knitr) library(httr) Exercise 2.1 Explore the following four time series: Bricks from aus_production, Lynx from pelt, Close from gafa_stock, Demand from vic_elec. data(aus_production, pelt, gafa_stock, vic_elec) Use ? (or help()) to find out about the data in each series. #To prevent the markdown file f...
7239 sym R (4228 sym/39 pcs) 18 img 4 tbl
Data 605 - Final Project
library(tidyverse) library(scales) library(GGally) library(knitr) library(matrixcalc) library(MASS) library(ldsr) library(EnvStats) set.seed(87) palette <- c("#49c6e5", "#255f85", "#fae1df", "#ff3864", "#130303") to_LaTeX <- function(A){ rows <- apply(A, MARGIN=1, paste, collapse = " & ") matrix_string <- paste(rows, collapse = " \...
17312 sym R (29228 sym/64 pcs) 12 img 1 tbl
Data 607 - Final Project - Research
Load the Required Packages: Before we begin, we load the packages required for data analysis, we set a seed so that the visualizations of our graphs will be consistent, and we establish a palette. library(tidyverse) library(sf) library(spData) library(rnaturalearth) library(xml2) library(igraph) library(knitr) library(markovchain) set.seed...
6465 sym R (18134 sym/19 pcs) 3 img 3 tbl
Data 605 - Homework 14
Question: This week, we’ll work out some Taylor Series expansions of popular functions. For each function, only consider its valid ranges as indicated in the notes when you are computing the Taylor Series expansion. Please submit your assignment as an R- Markdown document. Function 1: \[ f(x) = \frac{1}{(1 − x )}; c = 0 \] \[ f(0) = \frac{...
3627 sym
Data 607 - Project 4
Load the Required Packages: Below, we load the packages required for data analysis, predictive document classification, and visualization. library(knitr) library(tidyverse) library(tidytext) library(textdata) library(rpart) library(rpart.plot) library(DT) Load the Poetry and Short Story Data: We will be predicting whether a text document is...
5860 sym R (12095 sym/17 pcs) 1 img 9 tbl
Data 605 - HW13
Question 1: Use integration by substitution to solve the integral below. \[ \int 4e^{-7x}\,dx \] \[ = 4\int e^{-7x}\,dx \] \[ u = -7x, \,du = -7dx, \, -\frac{1}{7}du = dx\] \[ = 4\int -\frac{1}{7}e^{u}\,du \] \[ = 4(-\frac{1}{7} \int e^{u}\,du) \] \[ = -\frac{4}{7} e^u \] \[ = -\frac{4}{7} e^{-7x} + C \] Question 2: Biologists are treating a p...
3623 sym 1 img
Data 607 - Week 11
Load the Required Packages: Below, we load the packages required for data analysis. library(knitr) library(tidyverse) Load the Movie Ratings Data: Below, we load the movie ratings data from which we will build our recommender system and store it in a data frame. my_url <- "https://raw.githubusercontent.com/geedoubledee/data607_week11/main/Week11...
2486 sym R (2935 sym/7 pcs) 5 tbl
Data 605 - Homework 12
Load Packages: library(tidyverse) Load Data: my_url <- "https://raw.githubusercontent.com/geedoubledee/data605_hw12/main/who.csv" who_df <- read.csv (my_url) Intro: The who.csv dataset contains real-world data from 2008. The variables included follow: Country: name of the country LifeExp: average life expectancy for the country in years Infan...
5987 sym R (4869 sym/29 pcs) 9 img
Data 607 - Discussion 11
Allrecipes.com’s Recommender System: Allrecipes.com is a site I visit frequently when I am looking to recreate an unfancy dish from my childhood. Think “salads” that don’t have any lettuce in them, casseroles made with condensed soup, or no-bake cookies. Their main recommender system is a section called “You’ll Also Love” that app...
5794 sym
Data 605 - Discussion 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? Answer: library(tidyverse) We...
4443 sym R (7771 sym/17 pcs) 4 img