# Rcmdr menus for the MAc package
# When the plug-in is loaded, these menus are merged with the standard Rcmdr menus 

# last modified: 03.12.2010 by AC Del Re

##===================== MAIN MAc MENU ========================##

#type    menu/item      operation/parent    label                              command/menu                activation    			install?

menu    MAcMenu	        topMenu     		""                                   ""                           ""				    ""
item    topMenu         cascade         	"MAc"                                MAcMenu                      ""			        ""


#== Calculate ES ==#   

#type   menu/item      operation/parent  	label                          	 command/menu                activation    				install?

menu    CalcESMenu		MAcMenu     			""                                  		 "" 			                 ""				   ""
item    MAcMenu 		cascade         "Calculate Effect Sizes"            		 		CalcESMenu                   	 ""				    ""

# Calculate ES menu

menu    corMenu			MAcMenu     						""                                  	"" 			               	  ""				   ""
menu    meansMenu		MAcMenu     						""                                   	"" 			               		  ""				   ""
menu    orMenu			MAcMenu     						""                                   	"" 			                		""				   ""
   
# Correlation
menu    corMenu			  CalcESMenu          		""																		""							 						""						 ""
item    corMenu	   		command         		"r from chi-squared"        		   	   r_from_chicmd     		      ""             "packageAvailable('MAd')"
item    corMenu	      command       	    "r from d (n of both grps same)"       r_from_dcmd				 	 			""              "packageAvailable('MAd')"
item    corMenu	      command             "r from d (n of both grps not same)"   r_from_d1cmd               ""              "packageAvailable('MAd')"
item    corMenu	      command             "r from t-statistic"                   r_from_tcmd                ""             "packageAvailable('MAd')"
item    corMenu	      command             "r to d"						                   r_to_dcmd              		  ""             "packageAvailable('MAd')"
item    corMenu       command             "variance of r"                        var_rcmd                      ""                      "packageAvailable('MAc')"
item    corMenu       command             "r to Fisher's z"                      r_to_zcmd                     ""                      "packageAvailable('MAc')"
item    corMenu       command             "variance of Fisher's z"               var_zcmd                      ""                      "packageAvailable('MAc')"
item    CalcESMenu	  cascade             "Correlational"        		  	      	 corMenu 										""							""

# Mean Differences
menu     meansMenu		  CalcESMenu          ""																				""							 						""						 					""
item     meansMenu	    command         	  "ancova to d (adj. SD)" 				     	 ancova_to_d1cmd     		     		""                      "packageAvailable('MAd')"
item     meansMenu	    command       	    "ancova to d (pooled SD)"				       ancova_to_d2cmd				 	 				""                      "packageAvailable('MAd')"
item     meansMenu	    command             "d to unbiased g"       							 d_to_gcmd                  ""                      "packageAvailable('MAd')"
item     meansMenu	    command             "f-value (ANCOVA) to d"                f.ancova_to_dcmd                   ""                      "packageAvailable('MAd')"
item     meansMenu	    command         	  "f to d"				          		  			 f_to_dcmd     		     		""                      "packageAvailable('MAd')"
item     meansMenu	    command       	    "raw means and SDs to d"               mean_to_dcmd				 	 				""                      "packageAvailable('MAd')"
item     meansMenu	    command             "means with pooled SD to d"            mean_to_d2cmd                  ""                      "packageAvailable('MAd')"
item     meansMenu	    command             "one-tailed p-value (ANCOVA) to d"     p.ancova_to_d1cmd                   ""                      "packageAvailable('MAd')"
item     meansMenu	    command       	    "two-tailed p-value (ANCOVA) to d"     p.ancova_to_d2cmd				 	 				""                      "packageAvailable('MAd')"
item     meansMenu	    command             "one-tailed p-value to d"     				 p_to_d2cmd                   ""                      "packageAvailable('MAd')"
item     meansMenu	    command       	    "two-tailed p-value to d"     				 p_to_d1cmd				 	 				""                      "packageAvailable('MAd')"
item     meansMenu	    command             "t-test to d"    									     t_to_dcmd                  ""                      "packageAvailable('MAd')"
item     meansMenu	    command             "t-test (ANCOVA) to d"                 tt.ancova_to_dcmd                   ""                      "packageAvailable('MAd')"
item     meansMenu	    command      	      "r from d (n of both grps same)"       r_from_dcmd				 	 			""              "packageAvailable('MAd')"
item     meansMenu	    command             "r from d (n of both grps not same)"   r_from_d1cmd               ""              "packageAvailable('MAd')"
item     meansMenu	    command             "r to d"						                   r_to_dcmd              		  ""             "packageAvailable('MAd')"
item     meansMenu		  command         	  "log odds ratio to d"        		   			 lor_to_dcmd     		      ""                      "packageAvailable('MAd')"
item     meansMenu	 	  command       	    "proportions to d"                       prop_to_dcmd				 	 				""                      "packageAvailable('MAd')"
item     CalcESMenu	    cascade             "Mean Differences"        		  	   	 meansMenu 		        				 ""                      ""

# Odds Ratio
menu    orMenu			CalcESMenu            ""																				""													""										 ""
item    orMenu		    command         	  "log odds ratio to d"        		   			 lor_to_dcmd     		      ""                      "packageAvailable('MAd')"
item    orMenu	 	    command       	    "proportions to d"                       prop_to_dcmd				 	 				""                      "packageAvailable('MAd')"
item    orMenu		    command             "proportions to odds ratio"              prop_to_orcmd                 ""                      "packageAvailable('MAd')"
item    CalcESMenu 	  cascade             "Odds Ratios"			              		 	   orMenu 	               		 ""         							 ""

#old menu
#menu  	CalcESMenu		MAcMenu     	""                                     ""                            ""						""
#item    CalcESMenu	    command         "r from chi-squared"        		   r_from_chicmd     		     ""                      "packageAvailable('MAc')"
#item    CalcESMenu	    command         "r from mean difference (d)"           r_from_dcmd				 	 ""                      "packageAvailable('MAc')"
#item    CalcESMenu	    command         "r from mean difference (d) II"        r_from_d1cmd                  ""                      "packageAvailable('MAc')"
#item    CalcESMenu	    command         "r from t-statistic"                   r_from_tcmd                   ""                      "packageAvailable('MAc')"
#item    CalcESMenu      command         "variance of r"                        var_rcmd                      ""                      "packageAvailable('MAc')"
#item    CalcESMenu      command         "r to Fisher's z"                      r_to_zcmd                     ""                      "packageAvailable('MAc')"
#item    CalcESMenu      command         "variance of Fisher's z"               var_zcmd                      ""                      "packageAvailable('MAc')"
#item    MAcMenu         cascade         "calculate ES"           			   CalcESMenu                    ""						""

#== Within-Study Aggregation ==#

#type    menu/item  operation/parent  label                              		command/menu                activation    			install?

menu    AggMenu		MAcMenu     			""                                   "" 			                 ""				   ""
item    AggMenu	    command         "Meta-Analysis aggregation"        		   	 MetaRcmd 		        	 	 ""                "packageAvailable('MAc') && packageAvailable('plyr')"
item    MAcMenu     cascade         "Within-study aggregation"            		 AggMenu                     	 ""					""


#== Omnibus Analysis ==#

#type    menu/item    operation/parent 		label                         		command/menu                activation    				install?

item    MAcMenu		  command         		"Omnibus analysis"        	  		OmnibusEScmd			          ""                     		"packageAvailable('MAc') && packageAvailable('plyr')"


#== Moderator Analysis ==#

#type    menu/item   	operation/parent  label                             		  	command/menu                activation  			  	install?

menu    ModMenu		 	MAcMenu     			""                            		  	""                          ""						""
item    ModMenu	     	command         "Categoical moderation"       					CatModcmd         			""                      "packageAvailable('MAc') && packageAvailable('plyr')"
#item   ModMenu	 		command         "Categoical moderation (random)"    	  		CatModrcmd 					""                      "packageAvailable('plyr') && packageAvailable('ggplot2')"
#item   ModMenu	 		command         "Homogeneity test: cat mod (fixed)"   	 		CatModfQcmd            	    ""                      "packageAvailable('MAc') && packageAvailable('plyr')"
#item   ModMenu	 		command         "Homogeneity test: cat mod (random)" 	 		CatModrQcmd                 ""                      "packageAvailable('MAc') && packageAvailable('plyr')"
#item   ModMenu     	command         "Direct comparison: cat mod (fixed)"  	  		CatCompfcmd                 ""                      "packageAvailable('MAc') && packageAvailable('plyr')"
item    ModMenu     	command         "Direct comparison: cat mod"		 	  		CatCompcmd                 ""                      "packageAvailable('MAc') && packageAvailable('plyr')"
item    ModMenu     	command         "Single predictor meta-regression"    	  		MAreg1cmd                   ""                      "packageAvailable('MAc') && packageAvailable('plyr')"
item    ModMenu     	command         "Multiple predictor meta-regression"  	  		MAreg2cmd                   ""                      "packageAvailable('MAc') && packageAvailable('plyr')"
item    MAcMenu      	cascade         "Moderator analysis"                 		  	ModMenu                 	""						""


#== Graphics ==#

#type    menu/item      operation/parent  label                              		command/menu                activation   				 install?

menu 	GraphMenu		MAcMenu     	""                                     		""                          ""						""
item    GraphMenu	    command         "Categorical moderator graph"          		CatModGraphcmd       		""                      "packageAvailable('MAc') && packageAvailable('plyr') && packageAvailable('ggplot2')"
item    GraphMenu	    command         "Forest plot"				           		ForestPlotcmd 				""                      "packageAvailable('MAc') && packageAvailable('plyr') && packageAvailable('ggplot2')"
item    GraphMenu	    command         "Funnel plot"       				   		FunnelPlotcmd               ""                      "packageAvailable('MAc') && packageAvailable('ggplot2')"
item    GraphMenu	    command         "Meta-regression graph"                		MAregGraphcmd               ""                      "packageAvailable('MAc') && packageAvailable('ggplot2')"
item    GraphMenu       command         "Multiple predictor moderator graph"  		MultiModGraphcmd            ""                      "packageAvailable('MAc') && packageAvailable('ggplot2')"
item    MAcMenu         cascade         "Graphics"           				   		GraphMenu                   ""						""


##== Other ==##

menu 	OtherMenu		MAcMenu     	""                                    		 ""                         ""						""
item    OtherMenu	    command         "Complete dataset"					        ComplDatacmd			 		 ""                "packageAvailable('plyr') && packageAvailable('ggplot2')"
item    OtherMenu	    command         "Correction for attenuation"           		CorAttencmd         			""                  "packageAvailable('MAc')"
item    OtherMenu       command         "Agreement: Kappa (cat. data)"   	        Kappacmd                    ""                      "packageAvailable('MAc')"
item    MAcMenu         cascade         "Other functions"      				   	    OtherMenu                   ""						""

      