Dennis Lyubyvy dennisliub

## PKI R encryption
require(PKI)
key <- PKI.genRSAkey(2048)
x <- charToRaw("Hello, world!")
e <- PKI.encrypt(x, key)
y <- PKI.decrypt(e, key)
stopifnot(identical(x, y))
print(rawToChar(y))
# https://www.quora.com/How-do-I-encrypt-specific-variables-columns-using-SHA-1-in-a-data-frame-in-R

## genesis_public_key
049953e8a2de9c0eb73c1e5ce48287b9bbcd6e2d7340215e85764387d8b4e013bbaa7a0d6ff70f75b14d26e694e81ae1d98bcb886e92fbad202430b2503073cc41;romanornr

## 00-shiny-interactive-graphics.pdf

      
        
          
            
              
              2 files
            
          
          
            
              
              0 forks
            
          
          
            
              
              0 comments
            
          
          
            
              
              0 stars
            
          
        
        
          
              
          
          
            
                dennisliub
                / 00-shiny-interactive-graphics.pdf
            
            
              Created
              January 30, 2016 22:02
                — forked from wch/00-shiny-interactive-graphics.pdf
            
          
        
      
        
  
    
    

          
    
      
      Sorry, something went wrong. Reload?
      Sorry, we cannot display this file.
      Sorry, this file is invalid so it cannot be displayed.
      
          Viewer requires iframe.
	require(PKI)
	key <- PKI.genRSAkey(2048)
	x <- charToRaw("Hello, world!")
	e <- PKI.encrypt(x, key)
	y <- PKI.decrypt(e, key)
	stopifnot(identical(x, y))
	print(rawToChar(y))
	# https://www.quora.com/How-do-I-encrypt-specific-variables-columns-using-SHA-1-in-a-data-frame-in-R