Publications by Gustavo Seifer
Pitch - Week 4
mtcars Dataset - Data Products - week 4 Variables and MPG Gustavo Seifer 09.05.2020 Reproducible Pitch General Information URL: https://github.com/gus079/week4.git Please find all the files in the above link. 1- I create a Shiny application and deploy it on Rstudio’s servers. 2- I prepare a reproducible pitch presentation about the applica...
823 sym R (898 sym/3 pcs) 1 tbl
Plotly Graph - assignment: week 3
Understanding gas consumption vs weight and number of cylinders Dataset: mtcars Objective: understand the relationship of various factors to gas mileage (mpg). I plot weight (wt) in “x” vs. mileage per gallon (mpg) in “y”. I grouped by cylinders (cyl) as colors. Visualizing the Data with plotly ...
306 sym
Document
My First Leaflet Map - Data Products Course Create a leaflet map object. library(leaflet) map <- leaflet() %>% addTiles() Create a marker with a picture of Fleni and a link to its homepage. FleniIcon <- makeIcon( iconUrl = "https://www.google.com/url?sa=i&url=https%3A%2F%2Far.linkedin.com%2Fcompany%2Ffleni&psig=AOvVaw3JmDfUxENDYQTd4YUE70ca&u...
196 sym R (676 sym/3 pcs)
Class Imbalance
Load datasets train_raw <- read_csv("train.csv", guess_max = 1e5) %>% mutate(damaged = if_else(damaged > 0, "damaged", "no damaged")) test_raw <- read_csv("test.csv", guess_max = 1e5) EDA glimpse(train_raw) Rows: 21,000 Columns: 34 $ id <dbl> 23637, 8075, 5623, 19605, 15142, 27235, 12726, 20781,~ $ incident_year <dbl> 1...
104 sym R (13396 sym/33 pcs) 2 img
Hotel data analysis
Loading packages library(tidyverse) library(tidymodels) library(vip) theme_set(theme_bw()) We will build a model to predict which actual hotel stays included children and/or babies, and which did not. Loading dataset hotels <- read_csv('https://tidymodels.org/start/case-study/hotels.csv') %>% mutate_if(is.character, as.factor) Checkin...
510 sym R (12005 sym/48 pcs) 6 img
Toothgrowth
library(tidyverse) library(ggpubr) library(tinytex) theme_set(theme_bw()) The Effect of Vitamin C on Tooth Growth in Guinea Pigs Description The response is the length of odontoblasts (cells responsible for tooth growth) in 60 guinea pigs. Each animal received one of three dose levels of vitamin C (0.5, 1, and 2 mg/day) by one of two deliver...
2141 sym R (3606 sym/16 pcs) 2 img
Sample Simulation
Background In this project you will investigate the exponential distribution in R and compare it with the Central Limit Theorem. The exponential distribution can be simulated in R with rexp(n, lambda) where lambda is the rate parameter. The mean of exponential distribution is 1/lambda and the standard deviation is also 1/lambda. Set lambda = 0.2 ...
679 sym R (3124 sym/17 pcs) 1 img
Storm Data Analysis
Exploring the NOAA Storm Database: US Severe Weather impacts on Health and Economics Assignment The objective of this assignment is to explore the NOAA Storm Database and answer some basic questions about severe weather events. Background The NOAA database tracks characteristics of major weather events in US, including when and where they occur...
2342 sym R (7361 sym/28 pcs) 4 img 4 tbl
Alcohol Consumption
library(tidyverse) library(tidymodels) library(ggcorrplot) library(corrr) theme_set(theme_bw()) drinks <- read_csv("drinks.csv") drinks # A tibble: 193 x 5 country beer_servings spirit_servings wine_servings total_litres_of~ <chr> <dbl> <dbl> <dbl> <dbl> 1 Afghanistan ...
42 sym R (14434 sym/31 pcs) 6 img
Survival Analysis (Cirrhosis data)
library(tidymodels) library(tidyverse) library(ggpubr) library(ggcorrplot) library(GGally) library(mice) library(survival) library(survminer) theme_set(theme_bw()) tidymodels_prefer() Cirrhosis Context Cirrhosis is a late stage of scarring (fibrosis) of the liver caused by many forms of liver diseases and conditions, such as hepatitis ...
2511 sym R (23904 sym/51 pcs) 14 img