source("http://www.matthewckeller.com/runmx.R")

setwd("C:/temp/mxR")
mx.loc <- "C:/Progra~1/mx/bin/MXE.EXE"
script <- "c_factor.mx"
c.factor <- runmx(script,mx.loc)