Add test zone

r-object-browser.el

@@ -46,5 +46,7 @@
 (provide 'r-object-browser)
 
 ;;; r-object-browser.el ends here
+;;; Test zone
 
-(ess-command "print(data.frame(a = 1:100000), row.names = F, n = Inf)\n" (get-buffer "robjout"))
+(ess-force-buffer-current) ;; get current R process buffer
+(ess-command "ls()\n" (get-buffer robj-buffer))