具有log10转换的Radarchart

Question

我正在使用radarchart包中的fmsb，并且我需要在对数刻度上绘制一些变量。该程序包本身似乎没有内置的支持。有人为此解决过吗？

非常感谢！

library(fmsb)
sub <- structure(list(Methane = c(100, 0.001, 10), `Dissolved Oxygen, field measured` = c(5, 0, 5), `Iron` = c(10, 0.1, 1.3), 
    `Nitrate as N` = c(10, 0.01, 0.1), `Sulfate` = c(25, 0, 1)), row.names = c(NA, -3L), 
    class = c("tbl_df", "tbl", "data.frame"))


radarchart(sub)         

Answer 1

您想要的不仅仅是记录剩余变量的记录吗？这样做似乎很简单。

sub2 = sub
sub2[,c(1,3,4)] = lapply(sub2[,c(1,3,4)], log10)
radarchart(sub2)