From 195ce6715fa2f557056f32d544ca09784b2fdcc0 Mon Sep 17 00:00:00 2001 From: whelena Date: Fri, 4 Oct 2024 13:13:49 -0700 Subject: [PATCH] fix lintR --- R/add.text.R | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/R/add.text.R b/R/add.text.R index 029d3c3..d3d554f 100644 --- a/R/add.text.R +++ b/R/add.text.R @@ -497,9 +497,9 @@ add.text2 <- function( node.radius <- node.radius / scale; node.text <- node.text[node.text$node %in% tree$tip, ]; - node.list <- vector("list", nrow(tree)); - node.text.col <- vector("list", nrow(tree)); - node.text.fontface <- vector("list", nrow(tree)); + node.list <- vector('list', nrow(tree)); + node.text.col <- vector('list', nrow(tree)); + node.text.fontface <- vector('list', nrow(tree)); # Loop to assign text to nodes for (i in seq_len(nrow(node.text))) {