Choose the study design that best fits the following description: Incidence rates of early stage prostate cancer in the United States were compared in every consecutive year from 2005 to 2012. It was discovered that incidence rates had decreased along with PSA testing, following the 2008 U.S. Preventive Services Task Force recommendation against PSA testing for average risk older men

a) Cross Sectional Study

b) Prospective Cohort Study

c) Ecologic Study

d) Case Control Study

e) Randomized Clinical Trial

f) Retrospective Cohort Study

You are tasked with assessing the health department’s intervention program in preventing recurrence of acute alcohol poisoning. This is a program made available for free to anyone interested, and all teens arrested or admitted to the emergency department (ED) for alcohol related issues are made aware of the program. You cross-reference ED records from the past 5 years with records of program participation and school performance. You will assess performance in school as well as additional alcohol-related issues.

(3 pts.) What is the study design for this effort?

Cross-sectional

Prospective cohort

Retrospective cohort

Prospective interventional

Retrospective case-control

Some virtual teams at Boeing have discussions focused on military aircraft. Do some Internet research on UC security mechanisms and identify and briefly describe several that Boeing should have in place to ensure the privacy and integrity of such discussions.

I need the answer with no plagarism.

A partial list of the costs for Wisconsin and Minnesota Railroad, a short hauler of freight, follows. Classify each cost as either indirect or direct. For purposes of classifying each cost, use the train as the cost object.

Question 5 Python Language

1. What is the output of the following code ? (2 points)

a, b = 0, 1

while b < 10: print b

a, b = b, a+b

B. Explain List Comprehension (2 points)

Given v = [1 3 5]

w = [ [2*x, x**2] for x in v] What is the content of w?

c. What is tuple ?   What is the difference between tuple and list ? (2 points)

D. What is a module ?   What is the role of     all    ? (2 points)

Art galleries, museum, road and bridges are usually provided by government. What happen     when access to these goods become congested? Should the government begin to start charging a fee? Why or why not

A study finds that graduate students send a mean of 74 text messages per day with a standard deviation of 15.2 text message per day while undergraduate students send a mean of 116 text messages per day with a standard deviation of 26.51. Which group, the undergraduate students or the graduate students have more variation in the number of sent text messages?

Lenny is an elementary school principal. He's concerned about how the families at his school are doing currently, so he creates a list of questions to ask some of them to get an idea of how they're holding up.

Match each scenario below with the correct sampling technique.

1. The following R code sorts each vector in a list (lst) and stores the new list in lst1. The code uses a for loop.

   lst <- list(c1=sample(1:10,10,replace=TRUE),c2=sample(1:20,10,replace=TRUE),c3=sample(1:10,8,replace=TRUE))
   lst1 <- list()
   for(i in 1:length(lst))
   {
   lst1[[i]] <- sort(lst[[i]])
   }
   lst1

   Which of the following options does the same thing as the given R code above ?

   		lst <- list(c1=sample(1:10,10,replace=TRUE),c2=sample(1:20,10,replace=TRUE),c3=sample(1:10,8,replace=TRUE)) library(purrr) lst1 <- map(lst,sort) lst1
   		lst <- list(c1=sample(1:10,10,replace=TRUE),c2=sample(1:20,10,replace=TRUE),c3=sample(1:10,8,replace=TRUE)) library(purrr) lst1 <- map_dbl(lst,sort) lst1
   		None of the given options
   		lst <- list(c1=sample(1:10,10,replace=TRUE),c2=sample(1:20,10,replace=TRUE),c3=sample(1:10,8,replace=TRUE)) library(purrr) lst1 <- map_int(lst,sort) lst1

5 points   

QUESTION 2

1. Match the R code on the left (with loop) to its equivalent one (without loop) on the right.

   -       A.       B.       C.    V <- c(1,NA,0,4,-1,2) y <- c() for(i in 1:3) { y <- c(y,V[i]) }       -       A.       B.       C.    V <- c(1,NA,0,4,-1,2) y <- c() for(i in 1:4) { y <- c(y,V[i]) }       -       A.       B.       C.    df <- data.frame(col1 = sample(1:3,3,replace=FALSE),                  col2 = sample(1:3,3,replace=FALSE),                  col3 = sample(1:3,3,replace=FALSE)) y <- c() for(i in 1:ncol(df)) { y <- c(y,sum(df[,i])) }

   A. V <- c(1,NA,0,4,-1,2) y <- V[1:3] B. df <- data.frame(col1 = sample(1:3,3,replace=FALSE),                  col2 = sample(1:3,3,replace=FALSE),                  col3 = sample(1:3,3,replace=FALSE)) y <- colSums(df) C. V <- c(1,NA,0,4,-1,2) y <- V[1:4]

15 points   

QUESTION 3

1. Match the R code with the value of x

   (Here: try to work out the solution with hand and double check by running the code. Don't just run the code and get the answer without understanding the logic)

   -       A.       B.       C.       D.    V <- c(1,NA,0,4,-1,2) for(i in 1:3) { y <- V[i]   } x <- y       -       A.       B.       C.       D.    V <- c(1,NA,0,4,-1,2) for(i in 1:4) { y <- 1 } x <- y x       -       A.       B.       C.       D.    df <- data.frame(col1 = sample(1:3,3,replace=FALSE),                  col2 = sample(1:3,3,replace=FALSE),                  col3 = sample(1:3,3,replace=FALSE)) for(i in 1:ncol(df)) { y <- sum(df[,i]) } x <- y x       -       A.       B.       C.       D.    library(purrr) df <- data.frame(col1 = sample(1:4,4,replace=FALSE),                  col2 = sample(1:4,4,replace=FALSE),                  col3 = sample(1:4,4,replace=FALSE)) y <- map_dbl(df,max) x <- min(y) x

   A. 6 B. 0 C. 1 D. 4

20 points   

QUESTION 4

1. The following R code extracts the unique items in each vector in a list (lst) and stores the new list in lst1. The code uses a for loop.

   lst <- list(c1=sample(1:10,10,replace=TRUE),c2=sample(1:20,10,replace=TRUE),c3=sample(1:10,8,replace=TRUE))
   lst1 <- list()
   for(i in 1:length(lst))
   {
   lst1[[i]] <- unique(lst[[i]])
   }
   lst1

   Which of the following options does the same thing as the given R code above ?

   		lst <- list(c1=sample(1:10,10,replace=TRUE),c2=sample(1:20,10,replace=TRUE),c3=sample(1:10,8,replace=TRUE)) library(purrr) lst1 <- map_int(lst,unique) lst1
   		lst <- list(c1=sample(1:10,10,replace=TRUE),c2=sample(1:20,10,replace=TRUE),c3=sample(1:10,8,replace=TRUE)) library(purrr) lst1 <- map_dbl(lst,unique) lst1
   		None of the given options
   		lst <- list(c1=sample(1:10,10,replace=TRUE),c2=sample(1:20,10,replace=TRUE),c3=sample(1:10,8,replace=TRUE)) library(purrr) lst1 <- map(lst,unique) lst1

5 points   

Click Save and Submit to save and submit. Click Save All Answers to save all answers.