## Let's create some Basic code with labels and variables:
bas <- as.AmigaBasic(c(
"REM - This will loop forever...",
"my.label:",
" my.variable% = 0",
" WHILE my.variable% < 10",
" my.variable% = my.variable% + 1",
" WEND",
" GOTO my.label"
))
## list the names in the script above:
names(bas)
## change the first name:
names(bas)[1] <- "better.label"
Run the code above in your browser using DataLab