History: Profile_r_test1_simple_test

View page Collapse Into Edit Sessions

Preview of version: 9

Simple R commands to test that the installation went fine

Text output

This code:
{R()}1:10{R}


Produces:
 Plugin disabled
Plugin r cannot be executed.


1.2. Simple Graphical output

This code:
{R()}plot(1:10,11:20){R}


Produces:
 Plugin disabled
Plugin r cannot be executed.


1.3. Basic image with svg and pdf export

This code:
{R(svg="1", pdf="1")}x<-c(1:10)
y <- x*x
plot(x,y)
{R}


Produces:
 Plugin disabled
Plugin r cannot be executed.


Calling commands with admin validation (like install.packages, etc)

This command will attempt to install an R package, and it will require from an admin validation before it can be run from Tiki to the R server behind:
{RR(loadandsave="1", wikisyntax="0", removen="0")}
#   Example adapted from the ones shown here:  http://code.google.com/p/google-motion-charts-with-r/  
#   and here: http://www.r-bloggers.com/interactive-reports-in-r-with-knitr-and-rstudio/
#
# If required the first time, uncomment the following line/s to install the required R packages, and edit the path and url to suite your needs
if(!require(googleVis)){
	install.packages("googleVis", repos="http://ftp.heanet.ie/mirrors/cran.r-project.org/")
}
{RR}


Will produce:
 Plugin disabled
Plugin rr cannot be executed.


Once validated, it will show something like this (the fist time when the package was not installed yet):
'googleVis.Rnw'

The downloaded source packages are in
'/tmp/RtmpbI9rP4/downloaded_packages'


Or if we do't want to show the warning messages of the package loading on the wiki page, we can call the loading of the library with: suppressPackageStartupMessagesgoogleVis

Therefore, this:
{RR(loadandsave="1", wikisyntax="0")}
suppressPackageStartupMessages(library(googleVis))
{RR}


Will produce this other output:

 Plugin disabled
Plugin rr cannot be executed.

(nothing)


1.4. Graphical output with advanced packages

Using GoogleVis package, for instance.

1.4.1. Basic chart with information shown when mousing over the points

This code:
{R(wikisyntax="0" loadandsave="1", removen="0")}
require(googleVis)
df <- data.frame(x = 1:10, y = 1:10)

## load the googleVis package
suppressPackageStartupMessages(library(googleVis))
## create the scatter chart
sc <- gvisScatterChart(data=df,
                        options=list(width=300, height=300, 
                                     legend='none',
                                     hAxis="{title:'x'}",
                                     vAxis="{title:'y'}")

          )

##
print(sc, "chart")  ## same as cat(sc$html$chart)
{R}


Produces:

 Plugin disabled
Plugin r cannot be executed.


1.4.2. Basic Geolocated Map

This code:
{R(loadandsave="1", wikisyntax="0", removen="0")}
require(googleVis)
geo <- gvisGeoChart(CityPopularity, locationvar = "City",
                    colorvar = "Popularity", 
          options = list(region="US", height=350, displayMode = "markers",
                         colorAxis = "{colors: ['orange','blue']}") )
print(geo, "chart")
{R}


Produces:

 Plugin disabled
Plugin r cannot be executed.


Animated flash charts with time series data

This code:
{R(loadandsave="1", wikisyntax="0", removen="0")}
require(googleVis)
M <- gvisMotionChart(Fruits, "Fruit", "Year", options = list(width = 550, 
    height = 450))
print(M, "chart")
{R}


Produces:

 Plugin disabled
Plugin r cannot be executed.



And once everything is ready in your system (all packages installed, etc), you'll see something like this:

Image

History

Information Version
Sat 31 of Aug, 2013 08:03 GMT-0000 Xavier de Pedro updated 11
Thu 30 of May, 2013 10:41 GMT-0000 Xavier de Pedro adedd echo param 10
Sun 24 of Mar, 2013 23:42 GMT-0000 Xavier de Pedro updated and simplified the first test 9
Sun 06 of Jun, 2010 16:28 GMT-0000 Xavier de Pedro 8
Sun 06 of Jun, 2010 16:14 GMT-0000 Xavier de Pedro 7
Fri 04 of Jun, 2010 18:05 GMT-0000 Xavier de Pedro 6
Wed 02 of Jun, 2010 09:39 GMT-0000 Xavier de Pedro 5
Mon 22 of Feb, 2010 20:52 GMT-0000 Xavier de Pedro 4
Mon 22 of Feb, 2010 19:35 GMT-0000 Xavier de Pedro 3
Mon 22 of Feb, 2010 19:27 GMT-0000 Xavier de Pedro 2
Sun 21 of Feb, 2010 13:44 GMT-0000 Xavier de Pedro initial version after replacing "Bug tracker" with "R_test" and "bug" with "dataset" 1