How can I loop through URLs based on dates

Question

I am extracting data from JSON

mydata<- fromJSON("https://www.ine.pt/ine/json_indicator/pindica.jsp?op=2&varcd=0003971&Dim1=S3A201909&Dime3=2&