diff --git a/R/rpi_pinToBCM.R b/R/rpi_pinToBCM.R index 0852bff..59e0afc 100644 --- a/R/rpi_pinToBCM.R +++ b/R/rpi_pinToBCM.R @@ -13,10 +13,7 @@ #' @export #' #' @examplesIf is.rpi() -#' \dontrun { -#' rpi_pinToBCM(1) # produces error since pin #1 is not data -#' rpi_pinToBCM(40) # returns a named vector where bcm_line = 21 and pin_name = GPIO21 -#' } + rpi_pinToBCM <- function(pin_number) { # check pin number. Are all values valid data lines?