Forces same std and mean in the subsegments of common PCs.
adjustEOF(x)
x
EOF
an 'eof' object
R.E. Benestad
data(eof.c) eof <- adjustEOF(eof.c) plotEOF(eof)