Publications by Trishita Nath

Data 605 Homework 6

07.03.2021

Question 1 A bag contains 5 green and 7 red jellybeans. How many ways can 5 jellybeans be withdrawn from the bag so that the number of green ones withdrawn will be less than 2? # Combinations: (0 green + 5 green) + (1 green + 4 green) choose(5,0)*choose(7,5) + choose(5,1)*choose(7,4) ## [1] 196 Question 2 A certain congressional committee consi...

3137 sym R (2078 sym/26 pcs)

Data 607 Assignment 5

07.03.2021

## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## intersect, setdiff, setequal, union ## Warning: package 'plotly' was built under R version 4.0.4 ## ## Attaching package: 'plotly' ## The following object is ...

790 sym R (5006 sym/20 pcs)

DATA 607 Assignment 7

20.03.2021

library(XML) library(rjson) library(httr) library(tidyverse) ## -- Attaching packages --------------------------------------- tidyverse 1.3.0 -- ## v ggplot2 3.3.3 v purrr 0.3.4 ## v tibble 3.0.6 v dplyr 1.0.4 ## v tidyr 1.1.2 v stringr 1.4.0 ## v readr 1.4.0 v forcats 0.5.1 ## -- Conflicts -------------------------...

695 sym R (4591 sym/24 pcs)

DATA 605 Homework 9

27.03.2021

#11 page 363 The price of one share of stock in the Pilsdorff Beer Company is given by \(Y_n\) on the \(n\)th day of the year. Finn observes that the differences \(X_n = Y_{n+1} - Y_n\) appear to be independent random variables with a common distribution having mean \(\mu = 0\) and variance \(\sigma^2 = 1/4\). If \(Y_1 = 100\), estimate the proba...

4002 sym R (121 sym/4 pcs)

Data 607 Project 3 Part 1

28.03.2021

Create a short document, with the names of group members. You should briefly describe your collaboration tool(s) you’ll use as a group, including for communication, code sharing, and project documentation. You should have identified your data sources, where the data can be found, and how to load it. And you should have created at least a logica...

857 sym R (221 sym/1 pcs)

Data 607 Assignment 9

31.03.2021

Assignment – Web APIs The New York Times web site provides a rich set of APIs, as described here: https://developer.nytimes.com/apis You’ll need to start by signing up for an API key. Your task is to choose one of the New York Times APIs, construct an interface in R to read in the JSON data, and transform it into an R DataFrame. Introduction...

730 sym R (1436 sym/13 pcs)

Data 605 Homework 10

10.04.2021

Smith is in jail and has 1 dollar; he can get out on bail if he has 8 dollars. A guard agrees to make a series of bets with him. If Smith bets A dollars, he wins A dollars with probability .4 and loses A dollars with probability .6. Find the probability that he wins 8 dollars before losing all of his money if he bets 1 dollar each time (timid st...

1511 sym R (69 sym/4 pcs)

Data 607 TidyVerse CREATE assignment

10.04.2021

In this assignment, you’ll practice collaborating around a code project with GitHub. You could consider our collective work as building out a book of examples on how to use TidyVerse functions. GitHub repository: https://github.com/acatlin/SPRING2020TIDYVERSE FiveThirtyEight.com datasets. Kaggle datasets. Your task here is to Create an Example....

1179 sym R (4007 sym/14 pcs)

Data 605 Homework 11

18.04.2021

Introduction Using the “cars” dataset in R, build a linear model for stopping distance as a function of speed and replicate the analysis of your textbook chapter 3 (visualization, quality evaluation of the model, and residual analysis.) Dataset The cars dataset has two columns - “speed”" and “dist” that relate the car speed and the d...

1675 sym R (2196 sym/16 pcs) 4 img

Data 605 Final Exam

26.05.2021

Problem 1 Using R, generate a random variable X that has 10,000 random uniform numbers from 1 to N, where N can be any number of your choosing greater than or equal to 6. Then generate a random variable Y that has 10,000 random normal numbers with a mean of \(\mu=\sigma=(N+1)/2\) set.seed(10000) N <- 43 X <- round(runif(10000, 1, N)) Y <- roun...

3892 sym R (24097 sym/87 pcs) 6 img 3 tbl