# NOT RUN {
# Retrive organism identifiers from SRA Run Info Table
# palm.orgn <- get.sraOrgn(run_ids, con)
# Load Waxsystermes Exampel data
data("waxsys.palm.sra")
# Create wordcloud of organism terms
# using column "scientific_name" in data.frame
# Scaled by frequency of organism term in all of data.frame
PlotOrgn( waxsys.palm.sra )
# Scaled by proximity of organism tag to input sequence (pident)
PlotOrgn( waxsys.palm.sra , freq = FALSE)
# }
Run the code above in your browser using DataLab