First let us create an even split of the data into train and test partitions using createDataPartition. The code with a missing line is given below: set. seed(2)
# line of code
test <- iris[test_index,]
train <- iris[-test_index,]

Which code should be used in place of # line of code above?

a. test_index <- createDataPartition(y, times=1,p=0.5)
b. test_index <- sample(2,length(y),replace=FALSE) c. test_index <- createDataPartition(y, times=1,p=0.5,list=FALSE)
d. test_index <- rep(1,length(y))

adbusters is an oppressive not-for-profit organization, founded in 1989  determined to end capitalism. the goal is to  spread their message through a self published magazine (which contains no advertisements). the likely reason why adbusters publishes a magazine with spoof advertisements is that  adbusters wants to encourage consumers to think critically about ads. 

the benefits of raising bc’s minimum wage to $15 through a

series of pre-announced staged increases far outweigh the likely

costs. claims that such an increase will lead to massive job losses

in low-wage sectors of the economy are not credible.

• an increase to $15 would result in some job losses. however,

the likely impact is less than a 1 per cent reduction in the overall

provincial employment rate, and a 7.6 per cent reduction in the

employment rate for those currently making between $10.25

and $15 per hour.

• the large job loss impacts predicted by some opponents of

minimum wages misrepresent the existing economic research. in

reading and using that research, it is important to recognize that

estimates showing job loss effects of minimum wage increases

apply only to teenagers. estimated effects for young adult and

adult workers range from insignificant to non-existent.

• focusing on teenage workers plays up an inaccurate stereotype

about who earns very low wages in bc and leads to exaggerated

claims about job losses. only 26 per cent of those currently making

between $10.25 and $12 are teenagers, and only 5 per cent

of those making between $12 and $15 are teenagers.

the answer is clip art