Conjecture: every number composed of the numeral six repeated n times and ending in the numeral 8 is a term of this sequence. - Harvey P. Dale, Jun 16 2022
Select[Range[700000], SubsetQ[{2, 4, 6}, IntegerDigits[#^2]]&] (* The program generates the first 12 terms of the sequence. To generate more, increase the Range constant but the program may take a long time to run. *) (* Harvey P. Dale, Jun 16 2022 *)