# NOT RUN {
data(splitdata)
#Using Date of sowing as Main-plot factor and varieties as sub-plot factor and using LSD test
#Split plot analysis with LSD test for Yield
splitplot(splitdata[4],splitdata$Replication,splitdata$Date_of_Sowing,splitdata$Varities,1)
#Split plot analysis with LSD test for both Yield and Plant Height
splitplot(splitdata[4:5],splitdata$Replication,splitdata$Date_of_Sowing,splitdata$Varities,1)
# }
Run the code above in your browser using DataLab