How to print the change in last 2 daily opening prices in R

Question

So far my code is as follows:

companyList <- read.csv("~/Downloads/companylist.csv")

ticker <- as.vector(as.character(companyList[1:10, 'Symbol']))

stockData <- new.env()

x <- 1

while(x<11){
getSymbols(ticker[x], auto.assign = TRUE, env = stockData)
x <- x + 1
}

data <- getSymbols(ticker[1], auto.assign = FALSE, env = stockData)

val1 <- data[1, 'FLWS.Open']
val2 <- data[2, 'FLWS.Open']

change <- val2 - val1

print(change)

When I try to print the change in the 2 daily opening values nothing shows up. Is there an error in my syntax?