diff --git a/r.snippets.txt b/r.snippets.txt
index e4f5246..b5107ca 100644
--- a/r.snippets.txt
+++ b/r.snippets.txt
@@ -208,4 +208,6 @@ snippet parallelRDS
 	
 snippet objectSize
 	format(object.size(${1:Var1}), units = "MB", standard = "SI")
-	
\ No newline at end of file
+	
+snippet unMelt
+	mat <- data.table::dcast.data.table(myDT, row ~ col, value.var = "value")
\ No newline at end of file