﻿
Fit Model(
	Y( :Age, :MoCA ),
	Effects(
		:"α-syn"n, :DD, :"α-syn"n * :DD, :UPDRS III, :"α-syn"n * :UPDRS III,
		:DD * :UPDRS III, :"α-syn"n * :DD * :UPDRS III
	),
	Personality( "Manova" ),
	Run(
		Response Function(
			"Sum",
			Repeated( 1 ),
			Title( "Between Subjects", "Sum" ),
			"Intercept" << Test Details( 1 )
		),
		Response Function(
			"Contrast",
			Repeated( 2 ),
			Prefix( "Age and MoCA-Dependent variables*" ),
			Title( "Within Subjects", "Contrast" ),
			"Age and MoCA-Dependent variables" << Test Details( 1 ),
			"Age and MoCA-Dependent variables*α-syn" << Test Details( 1 ),
			"Age and MoCA-Dependent variables*DD" << Test Details( 1 ),
			"Age and MoCA-Dependent variables*α-syn*DD" << Test Details( 1 ),
			"Age and MoCA-Dependent variables*UPDRS III" << Test Details( 1 ),
			"Age and MoCA-Dependent variables*α-syn*UPDRS III" << Test Details( 1 ),
			"Age and MoCA-Dependent variables*DD*UPDRS III" << Test Details( 1 ),
			"Age and MoCA-Dependent variables*α-syn*DD*UPDRS III" <<
			Test Details( 1 )
		)
	),
	SendToReport(
		Dispatch(
			{"Within Subjects"},
			"M-transformed Parameter Estimates",
			OutlineBox,
			{Close( 0 )}
		)
	)
);
