Publications by Jaya Veluri
Document
num=17 files=list.files("C:/RData/Data605/week4/",pattern="\\.jpg")[1:num] View Shoes function height=1200; width=2500;scale=20 plot_jpeg = function(path, add=FALSE) { jpg = readJPEG(path, native=T) # read the file res = dim(jpg)[2:1] # get the resolution, [x, y] if (!add) # initialize an empty plot area if add==FALSE plot(1,1,xli...
221 sym R (1770 sym/8 pcs) 3 img
Document
##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? green_1 <-choose(5,1)*choose(7,4) green_0 <-choose(5,0)*choose(7,5) green_1 + green_0 ## [1] 196 ##2. A certain congressional committee consists of 14 senators and 13 represent...
3023 sym R (1290 sym/25 pcs)
Document
1. 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.) ##From problem 10 from book ##the density of minimum value among n independent random variables with an exponential density has mean μ/n n = 100 μ = 1000 ##expecte...
1137 sym R (1673 sym/5 pcs)
Document
Problem 3 Advanced Regression Descriptive and Inferential Statistics. Provide univariate descriptive statistics and appropriate plots for the training data set. Provide a scatterplot matrix for at least two of the independent variables and the dependent variable. Derive a correlation matrix for any three quantitative variables in the dataset. Te...
4134 sym R (21562 sym/55 pcs) 9 img 1 tbl
Document
Problem1 - Page Rank Solution Question 1 Form the A matrix. Then, introduce decay and form the B matrix as we did in the course notes. # Form A Matrix A <- matrix(c(0, 1/2, 1/2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1/3, 1/3, 0, 0, 1/3, 0, 0, 0, 0, 0, 1/2, 1/2, 0, 0, 0, 1/2, 0, 1/2, ...
2784 sym R (16174 sym/61 pcs) 34 img
Document
1. Find the equation of the regression line for the given points. Round any final values to the nearest hundredth, if necessary. ( 5.6, 8.8 ), ( 6.3, 12.4 ), ( 7, 14.8 ), ( 7.7, 18.2 ), ( 8.4, 20.8 ) datadf <- data.frame(xvalues=c(5.6, 6.3, 7, 7.7, 8.4), yvalues=c(8.8, 12.4, 14.8, 18.2, 20.8)) print (datadf) ## xvalues yvalues ## 1 5.6 ...
3066 sym R (1675 sym/9 pcs) 2 img
Document
Question 1 Use integration by substitution to solve the integral below. ∫4e−7xdx Solution Select u to be the g(x) inside f(g(x)) u=−7xdu=−7dx−du/7=dx Substitute dx with our du (reverse chain rule) pull out the 4 (constant) from the integrand \ e^{u}+c\ e^{-7x}+c Question 2. Biologists are treating a pond contaminated with bacteria. T...
4233 sym R (501 sym/6 pcs) 1 img
Document
##Question: This week, we’ll work out some Taylor Series expansions of popular functions. f(x) = 1/1−x f(x) = e^x f(x) = ln(1+x) f(x) = x^(1/2) For each function, only consider its valid ranges as indicated in the notes when you are computing the Taylor Series expansion. (a) f(x) = 1/1−x Answer: f(0) = 1 f’(0) = 1/(1−0)^2=1 f’’(0...
1439 sym
Document
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 dollar each time (timid...
849 sym R (1099 sym/9 pcs)
Document
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.) # Load the Data head(cars) ## speed dist ## 1 4 2 ## 2 4 10 ## 3 7 4 ## 4 7 22 ## 5 ...
1322 sym R (1156 sym/8 pcs) 4 img