Publications by Tom Buonora
TBuonora_Data605_Week1
library(animation) Linear Transformations on a Generic Graphic This exercise builds a graphic using a matrix or table of coordinates that define smaller rectangles. Then it applies a 2X2 transformation matrix to alter the graphic in several ways. It displays the animations in an X Window. The X11 plots are drawn with fig.show=‘hide’ and ...
2174 sym R (4451 sym/20 pcs) 2 img
Data605 Assignment10
Week 10 Gamblers Ruin 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 (a) he bets 1...
2551 sym R (1582 sym/11 pcs)
Data605 Assignment9
Week 9 P. 363 # 11 The price of one share of stock in the Pilsdorff Beer Company (see Exercise 8.2.12) is given by \(Y_n\) on the nth 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 \(...
3555 sym R (1060 sym/7 pcs) 1 tbl
Data605 Assignment8
Week 8 P. 303 # 11 A company buys 100 lightbulbs, each of which has an exponential lifetime of 1000 hours. What is the expected time for the first of these bulbs to burn out? (See Exercise 10.) The question is asking about the expected or mean or average time of any of the first (minimum) of 100 bulbs. Exercise 10 illustrated that the distrib...
2356 sym R (483 sym/12 pcs)
Data605 Assignment5
Probabilities 1) Bayes Formula Sensitivity a test’s ability to designate an individual with disease as positive. Specificity a test’s ability to designate an individual who does not have a disease as negative. A new test has a 96% sensitivity and a 98% specific. Given a .001 prevalence rate, what is the probability that an individua...
4518 sym R (1932 sym/40 pcs) 1 tbl
Data605 Assignment4
Eigen Image Variability Eigen Images or Eigen Faces is a Classification approach that is often used for such things as facial recognition. This assignment will calculate Eigen Vectors for a set of sneaker jpegs, and look at the variablity. Along the way, it will review some of the key concepts of Eigen Decomposition Consume The Images Crea...
3515 sym R (1619 sym/10 pcs)
Week3 Assignment
Rank and Eigen Vectors Rank What is the rank of the matrix A ? \[A \ = \ \begin{bmatrix} 1&2&3&4\\ -1&0&1&3\\ 0&1&-2&1 \\5&4&-2&-3 \end{bmatrix}\] If a square matrix has a determinant, then we immediately know that no row can be eliminated as being linearly dependent on any other row or linear combination of rows. a<-matrix(c(1,...
1672 sym R (743 sym/20 pcs) 1 img
Data605 Assignment6
Combinations 1) Jelly Beans 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? 196 Combinations ways_1_green<-choose(5,1) * choose(7,4) # 175 ways_0_green<-choose(5,0) * choose(7,5) # 21 # add the 2 because the...
3842 sym R (1902 sym/28 pcs)
Data605 Assignment7
Week 7 1) Uniform Distribution Let X1, X2, . . . , Xn be n mutually independent random variables, each of which is uniformly distributed on the integers from 1 to k. Let Y denote the minimum of the Xi’s. Find the distribution of Y . Y <- integer(100) k<-100 for (n in 1:k) { x<-floor(runif(n,1,k)) Y[n]<-min(x) } plot(Y, ylab = "Y...
1742 sym R (3262 sym/38 pcs) 5 img
Data605 Final 3
library(dplyr) # %>% library(tidyr) # replace_na library(gridExtra) # arrange() library(ggplot2) library(corrplot) library(matrixcalc) # lu.decomposition() library(MASS) # fitdistr() library(caret) # train/trainControl, dummyVars Ames is a city in Story County, Iowa, United States, located app...
6146 sym R (20151 sym/43 pcs) 10 img