View source for Working with sensitive data

{{method|moderator=Jouni}}
[[Category:Code under inspection]]

==Question==

How to work with data that has sensitive parts? 

==Answer==

=== Encode and save a table as object ===

; This interface encodes (encrypts) a table and saves it as an R object into the Opasnet server. You can retrieve the data using the code below by giving the password you gave here and the key of the model run (from the URL).

<rcode name='obj_encode_test' 
	variables="
		name:table|description:Paste your table here|type:table|
		name:password|type:password|description:Password (16,32, or 64 ascii characters)
	"
>

library(OpasnetUtils)

cat(paste("The table has", nrow(table), "rows and", ncol(table), "columns with names...\n", sep = " "))
oprint(table[1, ])

etable <- objects.encode(table, password)
objects.put(etable)

cat("The table has been encrypted and saved with name etable. Please write down the key of the run and your password, otherwise you will not be able to retrieve your data.\nDO NOT REMOVE THIS RUN, JUST CLOSE THE BROWSER WINDOW. Otherwise you will permanently remove your encrypted table.\n")

</rcode>

=== Open and decode (decrypt) a saved object ===

; You can open and decode a previously saved data by giving the key of the model run and the password you then created. 

<rcode name='obj_decode_test' 
	variables="
		name:token|type:text|description:Identifier of the run|
		name:password|type:password|description:Password (16,32, or 64 ascii characters)
	"
>

library(OpasnetUtils)

objects.get(token)
table <- objects.decode(etable, password)
oprint(table)
</rcode>

=== Working with non-sensitive data===

; You can also save and retrieve non-sensitive data, which anyone can open and see if they just have the key of the run that created the objects.

<rcode name='obj_save' 
	variables="name:table1|description:Paste your table here|type:table"
>

library(OpasnetUtils)

cat(paste("The table has", nrow(table1), "rows and", ncol(table1), "columns with names...\n", sep = " "))
oprint(table1[1, ])

objects.put(table1)

cat("The table has been saved with name 'table1'. Please write down the key of the run, otherwise you will not be able to retrieve your data.\nDO NOT REMOVE THIS RUN, JUST CLOSE THE BROWSER WINDOW. Otherwise you will permanently remove your table.\n")

</rcode>

; You can open a previously saved data by giving the key of the model run. 

<rcode name='obj_open' 
	variables="name:token|type:text|description:Identifier of the run"
>

library(OpasnetUtils)

objects.get(token)
oprint(table)
</rcode>

==See also==

==References==

<references/>

==Related files==

{{mfiles}}