From b7861b50c5f6c676eb7ba3e94a09814461b70464 Mon Sep 17 00:00:00 2001 From: wenyunie <143786716+wenyunie@users.noreply.github.com> Date: Thu, 23 Nov 2023 00:24:36 -0800 Subject: [PATCH 1/3] Update Dockerfile adding packages --- Dockerfile | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/Dockerfile b/Dockerfile index a8b138e..9ed599f 100644 --- a/Dockerfile +++ b/Dockerfile @@ -1,4 +1,5 @@ FROM rocker/tidyverse:4.3.2 -RUN Rscript -e "remotes::install_version('here', '1.0.1')" &&\ - Rscript -e "remotes::install_version('markdown', '1.11')" \ No newline at end of file +RUN Rscript -e "remotes::install_version('here', '1.0.1', upgrade='always')" &&\ + Rscript -e "remotes::install_version('Hmisc', '5.1.1', upgrade='always')" &&\ + Rscript -e "remotes::install_version('markdown', '1.11', upgrade='always')" From 7f296ef86f33e8a748838364873e62559c1fe47a Mon Sep 17 00:00:00 2001 From: Wenyu Nie Date: Thu, 23 Nov 2023 00:36:56 -0800 Subject: [PATCH 2/3] output cleaning --- analysis/03-analysis-plot.html | 467 --------------------------------- output/analysis_report.html | 4 +- 2 files changed, 2 insertions(+), 469 deletions(-) delete mode 100644 analysis/03-analysis-plot.html diff --git a/analysis/03-analysis-plot.html b/analysis/03-analysis-plot.html deleted file mode 100644 index 9d672d2..0000000 --- a/analysis/03-analysis-plot.html +++ /dev/null @@ -1,467 +0,0 @@ - - - - - - - - - - - - - -Analysis and Result - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
- - - - - - - -
-

Analysis

-

The one-sample t-test on the difference scores revealed a significant -difference between self-perceived attractiveness and the average -perception by others.

-
-Figure 1. Rating of attractiveness by other raters versus self. Error bars denote 95% bootstrap confidence interval. -

-Figure 1. Rating of attractiveness by other raters versus self. Error -bars denote 95% bootstrap confidence interval. -

-
-


-

The negative t-value (-8.5025) indicates that, on average, -individuals tend to overestimate their own attractiveness compared to -how others perceive them. The extremely low p-value (7.725e-16) supports -the rejection of the null hypothesis, further emphasizing the -substantial difference in self-perceived attractiveness.

-

The 95 percent confidence interval for the true mean difference is -(-0.9678015, -0.6040559). This interval does not include zero, -reinforcing the conclusion that individuals exhibit a systematic bias by -viewing themselves as more attractive than how others perceive them.

-
## # A tibble: 1 × 8
-##   estimate statistic  p.value parameter conf.low conf.high method    alternative
-##      <dbl>     <dbl>    <dbl>     <dbl>    <dbl>     <dbl> <chr>     <chr>      
-## 1   -0.786     -8.50 7.72e-16       313   -0.968    -0.604 Paired t… two.sided
-
## # A tibble: 1 × 8
-##   estimate statistic  p.value parameter conf.low conf.high method    alternative
-##      <dbl>     <dbl>    <dbl>     <dbl>    <dbl>     <dbl> <chr>     <chr>      
-## 1   -0.786     -8.50 7.72e-16       313   -0.968    -0.604 One Samp… two.sided
-


-

An additional test was performed to check if the difference is a -systematic and constant overrating of one’s own attributes, or if the -self-rating is also not accurate in the sense that it is not correlated -to others’ perception at all.

-
-Figure 2. Contour plot of the relationship between self vs others' rating of attractiveness. The red dashed line (r = 0.2745) indicates a weak significant correlation between these two variables. -

-Figure 2. Contour plot of the relationship between self vs others’ -rating of attractiveness. The red dashed line (r = 0.2745) indicates a -weak significant correlation between these two variables. -

-
-


-

The observed correlation is 0.2745, with a 95 percent confidence -interval between 0.1863 and 1.000. The p-value of 3.892e-07 is smaller -than the commonly used significance level of 0.05. Therefore, we have -sufficient evidence to reject the null hypothesis in favor of the -alternative hypothesis. The null hypothesis in this case is that the -true correlation between self rating and others’ perception is equal to -0. The 95 percent confidence interval does not include 0, further -supporting the hypothesis of a significant correlation.

-
## # A tibble: 1 × 8
-##   estimate statistic     p.value parameter conf.low conf.high method alternative
-##      <dbl>     <dbl>       <dbl>     <int>    <dbl>     <dbl> <chr>  <chr>      
-## 1    0.275      5.04 0.000000389       312    0.186         1 Pears… greater
-

In summary, the numerical results strongly support the conclusion -that individuals have a tendency to be overly confident in their -self-perceived attractiveness. The statistical evidence indicates a -significant pattern of overestimation. However, further analysis shows -that self-ratings and others’ ratings of attractiveness have at least a -small correlation. These findings shed a light on the dynamics of -self-perception in social contexts.

-
- - - - -
- - - - - - - - - - - - - - - diff --git a/output/analysis_report.html b/output/analysis_report.html index ffb6f5f..8972f33 100644 --- a/output/analysis_report.html +++ b/output/analysis_report.html @@ -464,7 +464,7 @@

Analysis

difference between self-perceived attractiveness and the average perception by others.

-Figure 1. Rating of attractiveness by other raters versus self. Error bars denote 95% bootstrap confidence interval. +Figure 1. Rating of attractiveness by other raters versus self. Error bars denote 95% bootstrap confidence interval.

Figure 1. Rating of attractiveness by other raters versus self. Error bars denote 95% bootstrap confidence interval. @@ -494,7 +494,7 @@

Analysis

self-rating is also not accurate in the sense that it is not correlated to others’ perception at all.

-Figure 2. Contour plot of the relationship between self vs others' rating of attractiveness. The red dashed line (r = 0.2745) indicates a weak significant correlation between these two variables. +Figure 2. Contour plot of the relationship between self vs others' rating of attractiveness. The red dashed line (r = 0.2745) indicates a weak significant correlation between these two variables.

Figure 2. Contour plot of the relationship between self vs others’ rating of attractiveness. The red dashed line (r = 0.2745) indicates a From 9d43f7a87fe53d3d53552e2a48e3fe3feeae70d2 Mon Sep 17 00:00:00 2001 From: wenyunie <143786716+wenyunie@users.noreply.github.com> Date: Thu, 23 Nov 2023 01:15:40 -0800 Subject: [PATCH 3/3] 'always' to 'never' --- Dockerfile | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Dockerfile b/Dockerfile index 9ed599f..3e8604f 100644 --- a/Dockerfile +++ b/Dockerfile @@ -1,5 +1,5 @@ FROM rocker/tidyverse:4.3.2 -RUN Rscript -e "remotes::install_version('here', '1.0.1', upgrade='always')" &&\ - Rscript -e "remotes::install_version('Hmisc', '5.1.1', upgrade='always')" &&\ - Rscript -e "remotes::install_version('markdown', '1.11', upgrade='always')" +RUN Rscript -e "remotes::install_version('here', '1.0.1', upgrade='never')" &&\ + Rscript -e "remotes::install_version('Hmisc', '5.1.1', upgrade='never')" &&\ + Rscript -e "remotes::install_version('markdown', '1.11', upgrade='never')"