if (FALSE) {
library(MASS)
library(relliptical)
library(SOPC)
IPC_MSESigmaA = c()
IPC_MSESigmaD = c()
IPC_LSigmaA = c()
IPC_LSigmaD = c()
data_M = data.frame(n = n, MSEA = IPC_MSESigmaA, MSED = IPC_MSESigmaD,
LSA = IPC_LSigmaA, LSD = IPC_LSigmaD)
print(data_M)}
Run the code above in your browser using DataLab