findsequencefunction[{1,4,9,16}, n]