--- a/frequency.xml	Mon Dec 18 09:38:02 2023 +0000
+++ b/frequency.xml	Mon Feb 26 07:54:14 2024 +0000
@@ -13,9 +13,10 @@
             data <- readRDS("$data")
             plot <- amp_frequency(
                 data,
-                #if $group_by
-                    group_by = "$group_by",
-                #end if
+                ## https://github.com/KasperSkytte/ampvis2/issues/167
+                ## #if $group_by
+                ##     group_by = "$group_by",
+                ## #end if
                 ## tax_class = NULL,
                 tax_empty = "$tax_empty",
                 tax_aggregate = "$tax_aggregate",
@@ -29,7 +30,8 @@
     </configfiles>
     <inputs>
         <expand macro="rds_metadata_input_macro"/>
-        <expand macro="metadata_select_discrete" argument="group_by" label="Group the samples by "/>
+        <!-- https://github.com/KasperSkytte/ampvis2/issues/167
+            <expand macro="metadata_select_discrete" argument="group_by" label="Group the samples by "/> -->
         <expand macro="tax_empty_macro"/>
         <expand macro="taxlevel_macro" argument="tax_aggregate" label="The taxonomic level to aggregate the OTUs">
             <option value="OTU" selected="true">OTU/ASV</option>
@@ -48,12 +50,13 @@
             <output name="plot" value="AalborgWWTPs-frequency.pdf" ftype="pdf"/>
         </test>
         <!-- group_by -->
+        <!-- https://github.com/KasperSkytte/ampvis2/issues/167
         <test expect_num_outputs="1">
             <param name="data" value="AalborgWWTPs.rds" ftype="ampvis2"/> 
             <param name="metadata_list" value="AalborgWWTPs-metadata.list"/> 
             <param name="group_by" value="Plant"/> 
             <output name="plot" value="AalborgWWTPs-frequency-group_by.pdf" ftype="pdf"/>
-        </test>
+        </test> -->
     </tests>
     <help><![CDATA[
 What it does