Update rda_as_lda.R