Nothing
#'
#' Web-based tree explorer
#'
#' This function opens up an application in a web browser for an interactive exploration of the diversity in a set of trees.
#' For further details please see the "help" tab within the application.
#'
#' @seealso For convenience, \code{treespaceServer} is also available as a separate web app which can be used from any browser (it is not necessary to have \R installed): \url{https://mkendall.shinyapps.io/treespace/}
#'
#' @author Thibaut Jombart \email{thibautjombart@@gmail.com}
#' @author Michelle Kendall \email{michelle.louise.kendall@@gmail.com}
#'
#' @import ape
#' @import scatterD3
#' @import shiny
#' @import rgl
#' @importFrom ade4 dudi.pco
#' @importFrom adegraphics s1d.barchart
#' @importFrom adegraphics s.class
#' @importFrom adegraphics s.label
#@importFrom adephylo distTips
#' @importFrom distory dist.multiPhylo
#' @importFrom fields rdist
#' @importFrom htmlwidgets saveWidget
#' @importFrom MASS Shepard
#' @importFrom phangorn Children
#' @importFrom phangorn Descendants
#' @importFrom RLumShiny jscolorInput
#' @importFrom shinyBS bsTooltip
#' @importFrom utils packageDescription
#'
#'
#'
#' @export
treespaceServer <- function(){
## RUN APP
options(rgl.useNULL=TRUE)
runApp(system.file("shiny",package="treespace"))
return(invisible())
}
#'
#' Auxiliary functions
#'
#' These functions are not supposed to be used by the user.
#'
#' @author Thibaut Jombart \email{thibautjombart@@gmail.com}
#'
#'
#' @importFrom adegenet .readExt
#'
#' @export
.render.server.info <- function(){
renderPrint(
{
cat("\n== R version ==\n")
print(R.version)
cat("\n== Date ==\n")
print(date())
cat("\n== treespace version ==\n")
print(packageDescription("treespace", fields=c("Package", "Version", "Date", "Built")))
cat("\n== shiny version ==\n")
print(packageDescription("shiny", fields=c("Package", "Version", "Date", "Built")))
cat("\n== attached packages ==\n")
print(search())
}
) # end renderPrint
} # end .render.server.info
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.