这会做什么/产生什么？ [] []

Question

我有一段代码：

change <- round((table_subset$positive[1][1] - avg) * 100 / table$positive[1][1], 2) 

但是我不确定[1] [1]部分在做什么/他们在叫什么。有人可以向我解释一下，还是有其他方法可以做到？