I am new to R and need to encode the standard DES - Data encription algorithm in R Can anyone help me