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

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