Приятности

Что приятненького нам нужно каждый день

Аннотация

Значенье кошки нам непонятно

Источники позитивных эмоций

Просмотр картинок с котятами повышает настроение и психологи выяснили почему

“Сat-related media consumption”

У большинства «потребителей» просмотр кошачьих фото и видео повышает настроение и снижает негативные переживания. К таким выводам пришла психолог Джессика Майрик, исследуя реакцию пользователей на изображения котов в интернете (ссылка на исследование). Она даже предложила термин cat-related media consumption (что, видимо, нужно переводить как «котикомедиапотребление»). Она выяснила, что просмотр кошачьих фото и видео повышает настроение и снижает негативные переживания.

«У кошек большие глаза, выразительные мордочки, они сочетают грациозность и неуклюжесть. Большинству людей это кажется милым, — согласна психолог Наталия Богачева. — Даже те, кто не любит кошек, предъявляют претензии скорее к их характеру, чем к внешнему виду».

Список приятностей

• Внешние характеристики котиков
  • Большие глаза
  • Выразительные мордочки
• Характеристика движений котиков
  • Грациозность
  • Неуклюжесть
• Тактильные характеристики котиков
  • Теплые
  • Пушистые

Цитата

Каждый день следует прослушать хоть одну песенку, посмотреть на хорошую картину и, если возможно, прочитать хоть какое-нибудь мудрое изречение.

— И. Гёте

Котик иногда может сойти за хорошую картину

Что еще нам нужно для счастья?

Сон

Всем нужно хорошо спать, вот сколько спят животные (в виде таблицы)

library(tidyverse)

── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
✔ dplyr     1.1.4     ✔ readr     2.1.5
✔ forcats   1.0.0     ✔ stringr   1.5.1
✔ ggplot2   3.5.1     ✔ tibble    3.2.1
✔ lubridate 1.9.3     ✔ tidyr     1.3.1
✔ purrr     1.0.2     
── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
✖ dplyr::filter() masks stats::filter()
✖ dplyr::lag()    masks stats::lag()
ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors

sleep <- msleep
sleep

Вот сколько спят животные (в виде графика по видам)

library(plotly)

Присоединяю пакет: 'plotly'

Следующий объект скрыт от 'package:ggplot2':

    last_plot

Следующий объект скрыт от 'package:stats':

    filter

Следующий объект скрыт от 'package:graphics':

    layout

plot_ly(data=sleep, x = ~order, y = ~sleep_total, color = ~order)

No trace type specified:
  Based on info supplied, a 'bar' trace seems appropriate.
  Read more about this trace type -> https://plotly.com/r/reference/#bar

Warning in RColorBrewer::brewer.pal(N, "Set2"): n too large, allowed maximum for palette Set2 is 8
Returning the palette you asked for with that many colors
Warning in RColorBrewer::brewer.pal(N, "Set2"): n too large, allowed maximum for palette Set2 is 8
Returning the palette you asked for with that many colors

Итак, что нам нужно:

• Котята
• Сон

Сколько чего брать? Всего и побольше!

Имя	Количество
Котята	100%
Сон	100%

Myrick (2015)

Нравится ли вам эта страничка?

Да, конечно! Нееет

использованная литература

Myrick, Jessica Gall. 2015. «Emotion regulation, procrastination, and watching cat videos online: Who watches Internet cats, why, and to what effect?» Computers in human behavior 52: 168–76.