Skip to content
Snippets Groups Projects
Commit 4312b6ac authored by Elisabetta Ronchieri's avatar Elisabetta Ronchieri
Browse files

Update aapl_prezzi.R

parent 3393ba93
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 5 additions and 5 deletions
esempiII/aapl_prezzi.R
+ 5
− 5
View file @ 4312b6ac
# determinare l'errore # determinare l'errore
caricare il file # caricare il file
aapl <- read.csv(file='aapl_prezzi.csv', header=TRUE, stringsAsFactor=FALSE) aapl <- read.csv(file='aapl_prezzi.csv', header=TRUE, stringsAsFactor=FALSE)
invertire i dati sulle righe # invertire i dati sulle righe
aapl <- aapl[rev(rownames(aapl)),] aapl <- aapl[rev(rownames(aapl)),]
estrarre il prezzo di chiusura # estrarre il prezzo di chiusura
aapl_close <- aapl[, 'Close'] aapl_close <- aapl[, 'Close']
determinare informazioni statistiche in formato tabellare # determinare informazioni statistiche in formato tabellare
summary(aapl_close) summary(aapl_close)
scrivere il file modificato # scrivere il file modificato
write(aapl, file='aapl_prezzi_riordinato.csv') write(aapl, file='aapl_prezzi_riordinato.csv')
# riaprire il file # riaprire il file
......
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