Question

我几乎完成了所需的工作，基本上就是在x轴标签中用斜体显示“ q”和“Å”。但是，我想避免在“Å”之前和之后的空格...这可能是一个愚蠢的问题，但是我一直在尝试删除“〜”和其他未成功的东西。我哪里错了？基本上，结果应该是： “散射因子 q （1 / Å）”而不是“散射因子 q （1 / Å ）”

plot(1, 1, xlab= expression("Scattering factor,"~italic(q)~"(1/"~italic(Å)~")"))

谢谢。

Answer 1

我认为你想要

library(dplyr)

df %>%
  group_by(temp = cumsum(!lag(merge_with_next, default = TRUE))) %>%
  summarise(group = first(group),
            start = first(start), 
            end = last(end)) %>%
  ungroup() %>%
  select(-temp)

#  group start               end     
#  <int> <dttm>              <dttm>             
#1     1 2019-01-01 00:00:00 2019-01-03 23:59:00
#2     4 2019-01-04 00:00:00 2019-01-06 23:59:00
#3     7 2019-01-07 00:00:00 2019-01-09 23:59:00
#4    10 2019-01-10 00:00:00 2019-01-12 23:59:00

如何在R图中将一个字母更改为斜体样式而不添加空格

1 个答案: