| 
						
						
						
					 | 
				
				 | 
				
					@ -1,4 +1,4 @@ | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					ggstats_add_xy_test<-function(table_stat, table, xcol=NULL, group, y="max", bracket.offset=0.05, bracket.inspace=0.05, exclude_group=NULL){ | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					ggstats_add_xy<-function(table_stat, table, xcol=NULL, group, y="max", bracket.offset=0.05, bracket.inspace=0.05, exclude_group=NULL){ | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					  ## Adapted version to fit rstatix output | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					  value.var<-table_stat[[1,".y."]] | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					  if (is.null(xcol)){ | 
				
			
			
		
	
	
		
			
				
					| 
						
							
								
							
						
						
						
					 | 
				
				 | 
				
					
 |