###                                                        ###
###                         S12 Zadání                     ###
###                                                      	 ###


# Zdroje ------------------------------------------------------------------

## viz přednáška
## 

# Specifikace dat ---------------------------------------------------------

# V tomto cvičení jde o prozkoumání faktorové struktury zkrácené verze škály ECR-R (Fraley, Waller, and Brennan)
# prostřednictvím explorační faktorové analýzy ve vztahu k teorii attachmentu. ECR-R je vícedimenzionální 
# self-report dotazník určený k měření attachmentu v romantických vztazích, respondent se hodnotí na 
# sedmibodové Likertově škále.

# Datová matice je v souboru "CRR_attachment.csv". Data je nutné překódovat, 999 označuje chybějící hodnoty.
# Níže následuje popis proměnných:

ecrr.labels <- c("Pohlaví", ## (0=žena, 1=muž)
                 "délka vztahu", ## (v měsících)
                 "Pomáhá mi, když se v případě potřeby mohu obrátit na partnera/partnerku",
                 "Obvykle s partnerem/partnerkou prodiskutuji své problémy a starosti",
                 "S partnerem/partnerkou všechno prodebatuji",
                 "Připadá mi snadné se spoléhat na partnera/partnerku",
                 "Necítím se dobře, když se mám partnerovi/partnerce svěřovat",
                 "Raději partnerovi/partnerce nedávám najevo, jak se v hloubi duše cítím",
                 "Často si dělám starosti, že na mně partnerovi/partnerce skutečně nezáleží",
                 "Bojím se, že mě partner/partnerka může opustit",
                 "Trápím se tím, že partner/partnerka o mě nebude stát tak, jak já stojím o něj/ni")


# Zadání ------------------------------------------------------------------

# Na datech z ECR-R, která jste analyzovali pomocí EFA vytvořte
# 1. teoretický model (1-6 AV, 7-9 AX, korelované)
# 2. model, který byste udělali na základě vašich výsledků EFA
# 3. nejlépe fitující model, který s pomocí modifikačních indexů dokážete
# 4. nejlepší model. 
#    U něj zkuste argumentovat, proč je nejlepší, a interpretujte jeho parametry (=vykopírujte ty interpretované do skriptu).


## Na příslušné místo skriptu vždy vložte krátký komentář s vašimi interpretacemi, nestačí jen skript.
