The default user key can be set in the
USER_KEY variable and otherwise
~/.ssh/id_rsa. Note that on Windows we treat
~ as the windows user
home (and not the documents folder).
my_pubkey() function looks for the public key by appending
to the above key path. If this file does not exist, it reads the private key file
and automatically derives the corresponding pubkey. In the latter case the user
may be prompted for a passphrase if the private key is protected.
# Set random RSA key as default key <- rsa_keygen() write_pem(key, tmp <- tempfile(), password = "") rm(key) Sys.setenv("USER_KEY" = tmp) # Check the new keys print(my_key()) print(my_pubkey())
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.