df[["fontsize"]] <- 8 } return(df) }) names(features_list) <- unlist(lapply(nm, function(x) x[[2]])) @@ -9748,8 +9770,8 @@ DynamicPlot <- function(srt, features, lineages, group.by = NULL, cells = NULL, #' @imp
set_ylabel('Count', fontsize = 12) ax2.set_ylabel('Default Rate', fontsize = 12) legend1 = ax1.legend(loc = (.02,.94), fontsize = 10, shadow = True) legend2 = ax2.legend(loc = (.02,.9), fontsize = 10, shadow = True) plt.title('Count & Default Rate of Occupation T...