Detect Siren

detects if a data frame has a column of SIRENE identifier

detect_siren(.data)

Arguments

.data	a data frame

Value

a tibble

Examples

library("tibble")

table_datadetective <- tibble::tibble(
  v1 = c("123456789", "234567890"),
  v2 = c("1234567890123", "1234567890234")
  )

detect_siren(.data = table_datadetective)
#>   .id    x
#> 1  v1 TRUE