Thanks- I'm not able to do that due to sensitivity of the data. However, I found a solution:
table1(~ test_reason | country.x, data=df_linelist_perprotocolconfirmed, total=F, render.missing=NULL, render.categorical="FREQ (PCTnoNA%)", topclass="Rtable1-grid Rtable1-zebra")