## First setup a connection to a virtual device
my_device <- demo_adf()
adf_entry_info(my_device, "DF0:")
adf_entry_info(my_device, "s")
adf_entry_info(my_device, "s/startup-sequence")
close(my_device)
Run the code above in your browser using DataLab