# NOT RUN {
data(Data)
sse( Data )
sse( Data, "L" )
# }
# NOT RUN {
### Checking relation sst = sstr + sse
# }
# NOT RUN {
sst(Data) == sstr(Data) + sse(Data)
sst(Data, "L") == sstr(Data, "L") + sse(Data, "L")
# }
Run the code above in your browser using DataLab