Update 3dTopicAnalysis.r