># --- preload packages ---
>require()
Loading required package: 
># --- run the code ---
>formTableToAnalyse <- `Category of Readership by Level of Education`
>formNormalization <- "Principal"
>formInteractive <- TRUE
>formIgnoreRows <- "NET, Total, SUM"
>formIgnoreColumns <- "NET, Total, SUM"
>library(flipMultivariates)
>rows.to.remove <- unlist(strsplit("NET, Total, SUM", ","))
>columns.to.remove <- unlist(strsplit("NET, Total, SUM", ","))
>correspondence.analysis = CorrespondenceAnalysis(`Category of Readership by Level of Education`, normalization = "Principal", TRUE, rows.to.remove, columns.to.remove)
>correspondence.analysis