Fujian's submission for R course