Esempi di statistica descrittiva e inferenziale/Ricerca di esopianeti: differenze tra le versioni

Contenuto cancellato Contenuto aggiunto
Nessun oggetto della modifica
Riga 69:
NA's :1510
 
Dal seguente grafico si vede che gli oggetti considerati da Kepler candidati ad essere esopianeti sono in letteratura per metà considerati candidati e per metà confermati. Mentre gli oggetti considerati falsi positivi da Kepler sono considerati per la quasi totalità falsi positivi in letteratura ma una minima parte considerata confermata ad essere esopianeti in letteratura è considerata falso positivo da Kepler :
{{avanzamento|25%|6 aprile 2021}}
 
 
<syntaxhighlight lang="rsplus">
df %>%
ggplot(aes(valutazione_Kepler,fill=valutazione_letteratura)) +
geom_bar(aes(y=(..count../sum(..count..))))+
scale_y_continuous(labels = percent_format())+
ylab("Percentuale di esopianeti") +
xlab("Giudizio di Kepler ") +
ggtitle("Percentuale di esopianeti secondo Kepler e la letteratura")
</syntaxhighlight>
 
[[File:Percentuale di esopianeti secondo Kepler e la letteratura.png|frame|centro]]
 
Calcolo totale e percentuale di candidati in letteratura e candidati per Kepler :
 
<syntaxhighlight lang="rsplus">
df %>%
filter(valutazione_letteratura=="CANDIDATE",valutazione_Kepler=="CANDIDATE") %>%
summarise(totale=n(), percentuale=totale*100/nrow(cumulative))
</syntaxhighlight>
 
totale percentuale
2248 23.50481
 
 
Calcolo totale e percentuale di confermati in letteratura e candidati per Kepler :
 
 
<syntaxhighlight lang="rsplus">
df %>%
filter(valutazione_letteratura=="CONFIRMED",valutazione_Kepler=="CANDIDATE") %>%
summarise(totale=n(), percentuale=totale*100/nrow(cumulative))
</syntaxhighlight>
 
totale percentuale
2248 23.50481
 
 
<syntaxhighlight lang="rsplus">
df %>%
filter(nome_esopianeta!="",valutazione_letteratura=="CONFIRMED",valutazione_Kepler=="CANDIDATE") %>%
select(nome_esopianeta,valutazione_letteratura,valutazione_Kepler,punteggio) %>%
head()
</syntaxhighlight>
 
nome_esopianeta valutazione_letteratura valutazione_Kepler punteggio
1 Kepler-227 b CONFIRMED CANDIDATE 1.000
2 Kepler-227 c CONFIRMED CANDIDATE 0.969
5 Kepler-664 b CONFIRMED CANDIDATE 1.000
6 Kepler-228 d CONFIRMED CANDIDATE 1.000
7 Kepler-228 c CONFIRMED CANDIDATE 1.000
8 Kepler-228 b CONFIRMED CANDIDATE 0.992
 
 
{{avanzamento|2550%|6 aprile 2021}}
[[Categoria:Esempi di statistica descrittiva e inferenziale|Ricerca di esopianeti]]