Please write your code in R and submit your script and results for each of the following.

1. Create an encryption function using RC4 that takes a plain text and a key text as input and returns an encrypted stream of bits as output.