Con, in R, le seguenti istruzioni viene generato un numero. Determinane ordine di grandezza e l'arrotondamento al numero di cifre che viene indicato. Controlla le risposte col computer, battendo R(). Svolgi più volte l'esercizio ricopiando l'ultima riga.
C <- function(x) runif(1)*x; R <- function() cat(n, ' ',signif(x*10^n,m) ,'\n')
n <- -5;while(n < -4) n <<- floor(C(12)-6);x <<- C(1)+1;print(x*10^n,10); m <<- floor(C(5))+1; cat('odg ? arrotondamento a ',m,'cifre ?','\n')
# 167.2880955
odg ? arrotondamento a 4 cifre ?
R()
# 2 167.3
Il docente può usare esercizi come questo anche per compiti in classe, facendo
mettere ai vari alunni, in testa al file, set.seed(N) con N numeri interi diversi.
Il caso esemplificato è stato ottenuto con set.seed(123456789).