Commit de632a21 authored by alisiachiadorana's avatar alisiachiadorana

ex2html

parent 4d0d5158
...@@ -203,6 +203,8 @@ x <- c(14.0, 7.6, 11.2, 12.8, 12.5, 9.9, 14.9, 9.4, 16.9, 10.2, 14.9, 18.1, 7 ...@@ -203,6 +203,8 @@ x <- c(14.0, 7.6, 11.2, 12.8, 12.5, 9.9, 14.9, 9.4, 16.9, 10.2, 14.9, 18.1, 7
result.mean <- mean(x) result.mean <- mean(x)
result.max <- max(x) result.max <- max(x)
result.min <- min(x) result.min <- min(x)
result.median <- round(median(x),digits=2)
result.ecarttype <- round(sd(x),digits=2)
M=round(result.mean,digits=2) M=round(result.mean,digits=2)
print(M)</code></pre> print(M)</code></pre>
<pre><code>## [1] 14.11</code></pre> <pre><code>## [1] 14.11</code></pre>
...@@ -210,6 +212,10 @@ print(M)</code></pre> ...@@ -210,6 +212,10 @@ print(M)</code></pre>
<pre><code>## [1] 23.4</code></pre> <pre><code>## [1] 23.4</code></pre>
<pre class="r"><code>print(result.min)</code></pre> <pre class="r"><code>print(result.min)</code></pre>
<pre><code>## [1] 2.8</code></pre> <pre><code>## [1] 2.8</code></pre>
<pre class="r"><code>print(round(median(x),digits=2))</code></pre>
<pre><code>## [1] 14.5</code></pre>
<pre class="r"><code>print(round(sd(x),digits=2))</code></pre>
<pre><code>## [1] 4.33</code></pre>
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment