<MCE:STYLE type="text/css"></MCE:STYLE><MCE:STYLE mce_bogus="1" type="text/css"></MCE:STYLE><MCE:STYLE mce_bogus="1" type="text/css"></MCE:STYLE><STYLE mce_bogus="1" type="text/css"><!--
body, td {
font-family: sans-serif;
background-color: white;
font-size: 12px;
margin: 8px;
}
tt, code, pre {
font-family: 'DejaVu Sans Mono', 'Droid Sans Mono', 'Lucida Console', Consolas, Monaco, monospace;
}
h1 {
font-size:2.2em;
}
h2 {
font-size:1.8em;
}
h3 {
font-size:1.4em;
}
h4 {
font-size:1.0em;
}
h5 {
font-size:0.9em;
}
h6 {
font-size:0.8em;
}
a:visited {
color: rgb(50%, 0%, 50%);
}
pre {
margin-top: 0;
max-width: 95%;
border: 1px solid #ccc;
white-space: pre-wrap;
}
pre code {
display: block; padding: 0.5em;
}
code.r, code.cpp {
background-color: #F8F8F8;
}
table, td, th {
border: none;
}
blockquote {
color:#666666;
margin:0;
padding-left: 1em;
border-left: 0.5em #EEE solid;
}
hr {
height: 0px;
border-bottom: none;
border-top-width: thin;
border-top-style: dotted;
border-top-color: #999999;
}
@media print {
- Unknown macro: { background}
body
a, a:visited
hr
pre, blockquote
tr, img
img
@page :left
@page :right
p, h2, h3
h2, h3
}
--></STYLE>
<MCE:STYLE type="text/css"></MCE:STYLE><MCE:STYLE mce_bogus="1" type="text/css"></MCE:STYLE><MCE:STYLE mce_bogus="1" type="text/css"></MCE:STYLE><STYLE mce_bogus="1" type="text/css"><!--
pre .operator,
pre .paren
pre .literal
pre .number
pre .comment
pre .keyword
pre .identifier
pre .string
--></STYLE>
<MCE:SCRIPT type="mce-text/javascript"></MCE:SCRIPT>
<H1>R test</H1><P>Run the following scripts in RStudio and save the output text and plots. Upload a document with the outputs to Stellar.</P><H4>R test script 1</H4>
<PRE><CODE class="r">library("ggplot2")
c <- ggplot(mtcars, aes(qsec, wt))
c + stat_smooth()</CODE></PRE><H4>R test script 2</H4>
<PRE><CODE class="r">library("googleVis")
-
- Scatter chart
Scatter <- gvisScatterChart(women, options = list(legend = "none", lineWidth = 2,
pointSize = 0, hAxis.title = "weight", title = "Women", vAxis = "Unknown macro: {title}",
hAxis = "Unknown macro: {title}", width = 300, height = 300))
plot(Scatter)
cat(createGoogleGadget(Scatter), file = "scatterchart.xml")
</CODE></PRE>
- Scatter chart
<H4>Python test</H4>
Start Python in interactive mode, run the following commands and save the output text and plots. Upload a document with the outputs to Stellar.
<PRE><CODE class="r">from pyper import *</CODE><CODE class="r">import sys</CODE><CODE class="r">print(sys.version)
outputs = runR("a <- 3; print(a + 5)")
print outputs
</CODE></PRE>