Пакет cowplot
также имеет функцию align_plots
для этой цели (вывод не показан),
both2 <- align_plots(p1, p2, align="hv", axis="tblr")
p1x <- ggdraw(both2[[1]])
p2x <- ggdraw(both2[[2]])
save_plot("cow1.png", p1x)
save_plot("cow2.png", p2x)
, а также plot_grid
, который сохраняет графики в один и тот же файл.
library(cowplot)
both <- plot_grid(p1, p2, ncol=1, labels = c("A", "B"), align = "v")
save_plot("cow.png", both)
Это то, что вы ищете?
a = bytes.fromhex('c3')
res = a[0] - 256 if a[0] > 127 else a[0]
bytes.fromhex
берет строку и преобразует ее в объект byte
. Вы берете первый байт и оставляете его без знака, проверяя, больше ли он 127.
В качестве альтернативы:
res = int.from_bytes(bytes.fromhex('c3'), byteorder='big', signed=True)