Publications by Diego De Armas
Midterm DA
Q1 install.packages("tidyverse", repos = "https://cloud.r-project.org" ) ## ## The downloaded binary packages are in ## /var/folders/5_/389qrkvs1sd7nkp792bslx5r0000gn/T//RtmpdBnz7E/downloaded_packages library(tidyverse) ## ── Attaching packages ─────────────────────────────────...
1683 sym R (7011 sym/70 pcs) 2 img
Assigment 3
Assigment 3 1- A researcher wishes to conduct a study of the color preferences of new car buyers. Suppose that 50% of this population prefers the color red. If 20 buyers are randomly selected, what is the probability that between 9 and 12 (both inclusive) buyers would prefer red? #Sample size n <- 20 #probability of buyers preference for a red c...
2799 sym 2 img
Discussions 3
Discussion-Binomial and Poisson Let’s assume that a hospital’s neurosurgical team performed N procedures for in-brain bleeding last year. x of these procedures resulted in death within 30 days. If the national proportion for death in these cases is π, then is there evidence to suggest that your hospital’s proportion of deaths is more extrem...
834 sym
Probability Homework 2
#1- What is the probability of rolling a sum of 12 on three rolls of six-sided dice? Express your answer as a decimal number only. Show your R code. dice_rolls <- expand.grid(1:6, 1:6, 1:6) dice_rolls_matrix <- as.matrix(dice_rolls) roll_12 <- dice_rolls[rowSums(dice_rolls_matrix)==12,] prob_roll_12 <- nrow(roll_12)/(6^3) prob_roll_12 ## [1] 0.11...
2226 sym
Tree diagram diss 2
#install packages install.packages("BiocManager", repos= ("https://bioconductor.org/biocLite.R")) ## Warning: unable to access index for repository https://bioconductor.org/biocLite.R/src/contrib: ## cannot open URL 'https://bioconductor.org/biocLite.R/src/contrib/PACKAGES' ## Warning: package 'BiocManager' is not available for this version o...
33 sym R (4941 sym/29 pcs) 1 img
Iris Discussion
R Markdown Part 1 install.packages("psych", repos = "https://cloud.r-project.org") ## ## The downloaded binary packages are in ## /var/folders/5_/389qrkvs1sd7nkp792bslx5r0000gn/T//RtmpQrivO3/downloaded_packages library("psych") ?psych data(iris) x <- iris describe(x) ## vars n mean sd median trimmed mad min max range skew ...
80 sym R (4604 sym/46 pcs) 4 img
Titanic Homework
#Q1 install.packages("tidyverse", repos = "https://cloud.r-project.org") ## ## The downloaded binary packages are in ## /var/folders/5_/389qrkvs1sd7nkp792bslx5r0000gn/T//RtmpwJ7MSh/downloaded_packages library(tidyverse) ## ── Attaching packages ────────────────────────────────�...
704 sym R (7437 sym/38 pcs) 1 img