R/atgs.R

Defines functions browseBtn_cb

###################### AtGeneSearch interface ######################

# Launch browser to AtGeneSearch URL
browseBtn_cb <- function(button, user.data)
{
   ents <- exp_entitySelection("gene")
   if (length(ents) > 0) { 
	   browseURL(paste(.ATGeneSearchURL, paste(ents, collapse=";"), sep=""))
   }
}

Try the explorase package in your browser

Any scripts or data that you put into this service are public.

explorase documentation built on Nov. 8, 2020, 7:04 p.m.