This function takes a string as input and returns a compressed version of the string in Base64 format.
compressToBase64(string)A character string representing the compressed input string in Base64 format.
compressToBase64("Hello, world!")
#> [1] "BIUwNmD2A0AEDukBOYAmBCIA"