Publications by Michele Vicovaro
SNARC-like economic value
Prima parte: operazioni preliminari sui dati grezzi dei ratings prezzo e peso, e valutazione del possibile effetto dell’ordine dei compiti. Importo il dataset creato contenente i ratings di prezzo e peso individuali (Individuali_prezzopeso.xlsx). Il soggetto 14 non sembra aver compreso le istruzioni del rating di peso. Sembra aver utilizzato so...
2787 sym R (19735 sym/88 pcs) 5 img
Bayes_collisions
knitr::opts_chunk$set(include = TRUE) Iniziamo con l’importare il dataset (che abbiamo preventivamente salvato nella stessa cartella alla quale appartiene questo documento): library(readxl) data <- read_excel("dataNaturalness.xlsx") Modifico il nome delle variabili: names(data)<-c("mass","uA","C","resp","ns","sex","age","phys","id") Coverto v...
1151 sym R (2362 sym/13 pcs) 1 img
Gravity 2019-2020
Introduzione generale Studi precedenti mostrano che: 1) le persone tendono a credere erroneamente che gli oggetti più pesanti cadano al suolo molto più velocemente degli oggetti più leggeri; 2) Le persone percepiscono come “naturali” del movimenti di caduta caratterizzati da parametri fisici palesemente diversi da quelli fisicamente corret...
69730 sym R (3580 sym/9 pcs) 5 img
Bayes_collisions
knitr::opts_chunk$set(include = TRUE) # Iniziamo con l'importare il dataset (che abbiamo preventivamente salvato nella stessa cartella alla quale appartiene questo documento): library(readxl) data <- read_excel("data_Bayes_collisions.xlsx") # Coverto variabili a fattore: data$mR<-as.factor(data$mR) data$exp<-as.factor(data$exp) data$N_par...
11721 sym R (27566 sym/92 pcs) 4 img
TTC-ASD
library(dplyr) library(ggplot2) library(pastecs) library(lme4) library(lmerTest) library(lsmeans) library(gridExtra) library(readxl) Breve descrizione del compito: In ogni trial dell’esperimento, il soggetto vede uno stimolo (macchinina o point-light walker) muoversi orizzontalmente sullo schermo. Ad un certo punto, lo stimolo passa diet...
17994 sym R (55650 sym/102 pcs) 12 img
Urti_Bayes_Maniche
#knitr::optschunk$set(include = TRUE) library(readxl) data <- read_excel("data_Bayes_collisions.xlsx") #Carico output procedura di stima della manica load("G:/Il mio Drive/Bayes_collisions/Stima_manica/Manica_Urti/Heuristic/dati.temp_Heu_1-64.rda") Heuristic_1<-as.data.frame(Data) load("G:/Il mio Drive/Bayes_collisions/Stima_manica/Manica_U...
15997 sym R (42199 sym/180 pcs) 6 img