ropensci
diff --git a/‎R/pubchem.R‎
Lines changed: 1 addition & 1 deletion b/‎R/pubchem.R‎
Lines changed: 1 addition & 1 deletion
@@ -467,7 +467,7 @@ pc_prop <- function(cid, properties = NULL, verbose = getOption("verbose"), ...)
         return(data.frame())
       }
       out <- cont$PropertyTable[[1]]
-      out <- out |> dplyr::mutate(CID = x) |> dplyr::relocate(CID)
+      out <- out |> dplyr::mutate("CID" = x) |> dplyr::relocate("CID")
       return(out)
     } else {
       return(data.frame())
Original file line number	Diff line number	Diff line change
`@@ -467,7 +467,7 @@ pc_prop <- function(cid, properties = NULL, verbose = getOption("verbose"), ...)`
`467`	`467`	`return(data.frame())`
`468`	`468`	`}`
`469`	`469`	`out <- cont$PropertyTable[[1]]`
`470`		`- out <- out \|> dplyr::mutate(CID = x) \|> dplyr::relocate(CID)`
	`470`	`+ out <- out \|> dplyr::mutate("CID" = x) \|> dplyr::relocate("CID")`
`471`	`471`	`return(out)`
`472`	`472`	`} else {`
`473`	`473`	`return(data.frame())`