title: Change the label font size but also changed the x axia labels order when using ggtext
body: <p>My <a href="https://stackoverflow.com/questions/67161798/how-to-use-ggtext-change-the-label-size-but-not-the-legend-font-size">first question</a> is not completely solved by @teunbrand.</p>
  <p>He gave me a piece of advice but I'm confused by it.</p>
  <p>The x axis label is out of order after usting the <code>big_label_md function</code> though I get what I need.</p>
  <p>Now I want to get the right label order. The biggest problem is that if I just change one label font size the bottom label will keep the right order as before. However when I modify two or more(view my code) labels font size, all the labels will be out of order.</p>
  <p>Here is my reproducible data and code:</p>
  <pre><code>library(ggplot2)
  library(ggtext)
  
  data&lt;-structure(list(Name = structure(58:68, .Label = c(&quot;1_control&quot;, 
                                                          &quot;1_CCM(Kit1 ko)&quot;, &quot;2_control&quot;, &quot;2_CCM(Pdcd20 ko)&quot;, &quot;3_control&quot;, 
                                                          &quot;3_1 day&quot;, &quot;3_3 days&quot;, &quot;3_1 month&quot;, &quot;4_control&quot;, &quot;4_1 day&quot;, &quot;4_3 days&quot;, 
                                                          &quot;4_1 month&quot;, &quot;5_control&quot;, &quot;5_1 day&quot;, &quot;5_3 days&quot;, &quot;5_1 month&quot;, 
                                                          &quot;6_control&quot;, &quot;6_TBI(1 day)&quot;, &quot;7_control&quot;, &quot;7_TBI(3 day)&quot;, &quot;8_control&quot;, 
                                                          &quot;8_TBI(1 month)&quot;, &quot;9_control&quot;, &quot;9_VEGF&quot;, &quot;10_control&quot;, &quot;10_VEGF&quot;, 
                                                          &quot;11_Brain Healty&quot;, &quot;12_control_1&quot;, &quot;12_control_2&quot;, &quot;12_AOD(Jnk1/2/3 ko)&quot;, 
                                                          &quot;13_control&quot;, &quot;13_Cpt1_ko(Cdh5 driven)&quot;, &quot;14_control&quot;, &quot;14_Tsc2ko(Tbx4 driven)&quot;, 
                                                          &quot;15_control&quot;, &quot;15_Zmpste24 ko&quot;, &quot;16_control&quot;, &quot;16_Adrenomedullin\nko(Cdh5 driven)&quot;, 
                                                          &quot;17_Lung Healthy&quot;, &quot;18_control(14w)&quot;, &quot;18_carboplatin(14w)&quot;, 
                                                          &quot;18_radiation(14w)&quot;, &quot;18_6 weeks&quot;, &quot;18_70 weeks&quot;, &quot;19_ECs(bone marrow)&quot;, 
                                                          &quot;20_control&quot;, &quot;20_diabetic nephropathy&quot;, &quot;21_control&quot;, &quot;21_Alport syndrome&quot;, 
                                                          &quot;22_control&quot;, &quot;22_Alport syndrome&quot;, &quot;23_Kidney Healthy&quot;, &quot;24_control&quot;, 
                                                          &quot;24_Differentiated&quot;, &quot;25_Heart Healthy&quot;, &quot;26_control&quot;, &quot;26_Tumor&quot;, 
                                                          &quot;27_control&quot;, &quot;27_Nonalcoholic\nsteatohepatitis&quot;, &quot;28_Liver Healthy&quot;, 
                                                          &quot;29_control&quot;, &quot;29_autoimmune uveitis&quot;, &quot;30_control&quot;, &quot;30_facioscapulohumeral\nmuscular dystrophy&quot;, 
                                                          &quot;31_control&quot;, &quot;31_RANKL ko&quot;, &quot;32_control&quot;, &quot;32_Notch1  +/vg&quot;, 
                                                          &quot;32_Notch1  +/12&quot;, &quot;32_Notch1  +/-&quot;, &quot;32_Notch1  -/12&quot;), class = &quot;factor&quot;), 
                       Disease = structure(c(27L, 27L, 28L, 29L, 29L, 30L, 30L, 
                                             31L, 31L, 32L, 32L), .Label = c(&quot;CCM\nmodel1&quot;, &quot;CCM\nmodel2&quot;, 
                                                                             &quot;Epilepsy&quot;, &quot;EAE&quot;, &quot;Stroke&quot;, &quot;TBI\n1day&quot;, &quot;TBI\n3day&quot;, &quot;TBI\n1month&quot;, 
                                                                             &quot;VEGF\nsti_DG\nregion&quot;, &quot;VEGF\nsti_CA1\nregion&quot;, &quot;Healthy\n(Brain)&quot;, 
                                                                             &quot;AOD&quot;, &quot;CPT1\nko&quot;, &quot;Tsc2\nko&quot;, &quot;Zmpste\n_24 ko&quot;, &quot;AM\nko&quot;, 
                                                                             &quot;Healthy\n(Lung)&quot;, &quot;Chemo\nRadio\n(Tibiae)&quot;, &quot;ECs\n(BM)&quot;, 
                                                                             &quot;diabetic\nnephro\n_pathy&quot;, &quot;Alport\nsyndrome\nEC\npopulation1&quot;, 
                                                                             &quot;Alport\nsyndrome\nEC\npopulation2&quot;, &quot;Healthy\n(Kidney)&quot;, 
                                                                             &quot;Aorta&quot;, &quot;Healthy\n(Heart)&quot;, &quot;Tumor&quot;, &quot;NASH&quot;, &quot;Healthy\n(Liver)&quot;, 
                                                                             &quot;EAU&quot;, &quot;FSHD&quot;, &quot;RANKL\nko&quot;, &quot;Notch1\nmodified&quot;), class = &quot;factor&quot;), 
                       Organ = structure(c(6L, 6L, 6L, 7L, 7L, 8L, 8L, 9L, 9L, 10L, 
                                           10L), .Label = c(&quot;Brain&quot;, &quot;Lung&quot;, &quot;Bone&quot;, &quot;Kidney&quot;, &quot;Aorta&quot;, 
                                                            &quot;Liver&quot;, &quot;Retina&quot;, &quot;Mus&quot;, &quot;Lymp&quot;, &quot;Embryo&quot;), class = &quot;factor&quot;), 
                       fill = c(&quot;#FFFFFF&quot;, &quot;#00F5FF&quot;, &quot;#FFFFFF&quot;, &quot;#FFFFFF&quot;, &quot;#666666&quot;, 
                                &quot;#FFFFFF&quot;, &quot;#7FC97F&quot;, &quot;#FFFFFF&quot;, &quot;#BEAED4&quot;, &quot;#FFFFFF&quot;, &quot;#A6D854&quot;
                       ), Condition = c(&quot;#CCCCFF&quot;, &quot;#CCCCFF&quot;, &quot;#CCCCFF&quot;, &quot;#CCCCFF&quot;, 
                                        &quot;#CCCCFF&quot;, &quot;#CCCCFF&quot;, &quot;#CCCCFF&quot;, &quot;#fbb03b&quot;, &quot;#fbb03b&quot;, &quot;#fbb03b&quot;, 
                                        &quot;#fbb03b&quot;), Organ_fill = c(&quot;#00F5FF&quot;, &quot;#00F5FF&quot;, &quot;#00F5FF&quot;, 
                                                                   &quot;#666666&quot;, &quot;#666666&quot;, &quot;#7FC97F&quot;, &quot;#7FC97F&quot;, &quot;#BEAED4&quot;, &quot;#BEAED4&quot;, 
                                                                   &quot;#A6D854&quot;, &quot;#A6D854&quot;), mean = c(3219.28563479013, 2427.32556269574, 
                                                                                                   1552.81582140235, 394.765393523994, 420.454351698853, 1295.47692129111, 
                                                                                                   1357.53823242958, 1352.71703262044, 1319.89488759262, 4.78327819764262, 
                                                                                                   6.86013366170554), sd = c(641.298872189499, 338.296364941458, 
                                                                                                                             254.748027714364, 17.1375059099585, 100.491982520438, 49.0693043847785, 
                                                                                                                             191.034062908029, 105.031407429784, 185.916546617784, 1.21846060820158, 
                                                                                                                             3.38993644072368)), row.names = 58:68, class = &quot;data.frame&quot;)
  
  
  
  data
  ########
  
      big_label_md &lt;- function(x, label_only_this = c(&quot;Liver&quot;,&quot;Retina&quot;,&quot;Embryo&quot;), size = 14, color = &quot;black&quot;) {
        if (is.null(label_only_this)) {
          paste0(&quot;&lt;span style='font-size:&quot;, size, &quot;pt; color:&quot;, color, &quot;'&gt;&quot;, x, &quot;&lt;/span&gt;&quot;)
        } else {
          ifelse(x %in% label_only_this,
                 paste0(&quot;&lt;span style='font-size:&quot;, size, 
                        &quot;pt; color:&quot;, color, &quot;'&gt;&quot;, x, &quot;&lt;/span&gt;&quot;),
                 as.character(x))
        }
      }
      
      ggplot(data = data, aes(Name,mean, label = Name,fill=Organ)) +
        geom_bar(position=&quot;dodge2&quot;, stat=&quot;identity&quot;,width = 0.85,color=&quot;black&quot;) +
        # Wrap label in helper function
        facet_nested(.~big_label_md(Organ) + Disease, 
                     scales=&quot;free&quot;,switch = &quot;x&quot;,nest_line = TRUE)+
        theme_classic() +
        theme(legend.text = element_markdown())+
        theme(
          plot.title = element_text(hjust = 0.5),
          plot.margin = unit(c(5, 10, 10, 10), &quot;mm&quot;),
          strip.background = element_rect(colour=&quot;black&quot;, fill=&quot;white&quot;),
          strip.placement = &quot;outside&quot;,
          strip.text.x = element_markdown())
  </code></pre>