This is s test to see if we can



##Step 4. Create vectors for A and B with the levels for each factor
A <- rep(c(15,25,15,25), times=3)
B <- rep(c(1,1,2,2), times=3)
###step 5. Create vector for yield data
yield <- c(28,36,18,31,25,32,19,30,27,32,23,29) ##




You use here "readonly" attribute such that readers can only view and copy. The attribute "name" indicates the text box name. You can write down here anything you like. I have just named it as "Privacy Policy" because I will show privacy policy in text box below: