Email Address Validation
remotes::install_github("ropensci/addressable@main")
library("addressable")
x <- Address$new("User+tag@example.com")
x$host$host_name
#> [1] "example.com"
x$local$local
#> [1] "user+tag"
x$valid()
#> [1] TRUE
x$fail()
#> NULL
x <- Address$new("user1")
x$valid()
#> [1] FALSE
x$fail()
#> [1] "Invalid Domain Name"
addressable
in R doing citation(package = 'addressable')
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.