#* topic_clouds_3:
#*   attr:
#*     fillcolor: '3'
#*   desc: Topic cloud plot.
#*   ext: R
#*   inputs:
#*   - top_1000_terms_per_topic
#* 

topic_clouds_3 <- function( top_1000_terms_per_topic) {
  
  plot_topic_clouds(top_1000_terms_per_topic, 42*2 + (1:42))

  return(NULL)
}