R ggplot2 geom_rug 邊的地毯圖

地毯圖是一種緊湊的可視化，旨在用兩個一維邊分布補充二維顯示。地毯圖顯示個別案例，因此最好與較小的數據集一起使用。

用法

geom_rug(
  mapping = NULL,
  data = NULL,
  stat = "identity",
  position = "identity",
  ...,
  outside = FALSE,
  sides = "bl",
  length = unit(0.03, "npc"),
  na.rm = FALSE,
  show.legend = NA,
  inherit.aes = TRUE
)

參數

mapping

由 aes() 創建的一組美學映射。如果指定且inherit.aes = TRUE(默認)，它將與繪圖頂層的默認映射組合。如果沒有繪圖映射，則必須提供mapping。

data

該層要顯示的數據。有以下三種選擇：

如果默認為 NULL ，則數據繼承自 ggplot() 調用中指定的繪圖數據。

data.frame 或其他對象將覆蓋繪圖數據。所有對象都將被強化以生成 DataFrame 。請參閱fortify() 將為其創建變量。

將使用單個參數(繪圖數據)調用function。返回值必須是 data.frame ，並將用作圖層數據。可以從 formula 創建 function (例如 ~ head(.x, 10) )。

stat

用於該層數據的統計變換，可以作為 ggproto Geom 子類，也可以作為命名去掉 stat_ 前綴的統計數據的字符串(例如 "count" 而不是 "stat_count" )

position

位置調整，可以是命名調整的字符串(例如 "jitter" 使用 position_jitter )，也可以是調用位置調整函數的結果。如果需要更改調整設置，請使用後者。

...

其他參數傳遞給 layer() 。這些通常是美學，用於將美學設置為固定值，例如 colour = "red" 或 size = 3 。它們也可能是配對的 geom/stat 的參數。

outside

控製是否將地毯流蘇移出繪圖區域的邏輯。默認為關閉 (FALSE)。您還需要使用coord_cartesian(clip = "off")。當設置為 TRUE 時，還可以考慮將 Sides 參數更改為 "tr"。請參閱示例。

sides

控製地毯出現在繪圖的哪一側的字符串。它可以設置為包含任何 "trbl" 的字符串，用於頂部、右側、底部和左側。

length

設置地毯線長度的 grid::unit() 對象。使用比例擴展以避免數據過度繪製。

na.rm

如果 FALSE ，則默認缺失值將被刪除並帶有警告。如果 TRUE ，缺失值將被靜默刪除。

show.legend

合乎邏輯的。該層是否應該包含在圖例中？ NA(默認值)包括是否映射了任何美學。 FALSE 從不包含，而 TRUE 始終包含。它也可以是一個命名的邏輯向量，以精細地選擇要顯示的美學。

inherit.aes

如果 FALSE ，則覆蓋默認美學，而不是與它們組合。這對於定義數據和美觀的輔助函數最有用，並且不應繼承默認繪圖規範的行為，例如borders() 。

細節

默認情況下，地毯線的繪製長度相當於總繪圖大小的 3%。由於連續變量的默認尺度擴展在尺度兩端均為 5%，因此地毯不會與默認設置下的任何數據點重疊。

美學

geom_rug() 理解以下美學(所需的美學以粗體顯示)：

• alpha

• colour

• group

• linetype

• linewidth

• x

• y

在 vignette("ggplot2-specs") 中了解有關設置這些美學的更多信息。

例子

p <- ggplot(mtcars, aes(wt, mpg)) +
  geom_point()
p

p + geom_rug()

p + geom_rug(sides="b")    # Rug on bottom only

p + geom_rug(sides="trbl") # All four sides


# Use jittering to avoid overplotting for smaller datasets
ggplot(mpg, aes(displ, cty)) +
  geom_point() +
  geom_rug()


ggplot(mpg, aes(displ, cty)) +
  geom_jitter() +
  geom_rug(alpha = 1/2, position = "jitter")


# move the rug tassels to outside the plot
# remember to set clip = "off".
p +
  geom_rug(outside = TRUE) +
  coord_cartesian(clip = "off")


# set sides to top right, and then move the margins
p +
  geom_rug(outside = TRUE, sides = "tr") +
  coord_cartesian(clip = "off") +
  theme(plot.margin = margin(1, 1, 1, 1, "cm"))


# increase the line length and
# expand axis to avoid overplotting
p +
  geom_rug(length = unit(0.05, "npc")) +
  scale_y_continuous(expand = c(0.1, 0.1))