This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A316527 #26 Sep 08 2022 08:46:22 %S A316527 0,1,8,13,55,144,233,987,1597,4181,6765,10946,28657,46368,317811, %T A316527 2178309,3524578,9227465,14930352,24157817,39088169,102334155, %U A316527 267914296,701408733,1836311903,4807526976,7778742049,12586269025,32951280099,139583862445,225851433717 %N A316527 Fibonacci numbers whose sum of digits is not a prime. %t A316527 Rest[Select[Fibonacci[Range[100]], !PrimeQ[Total[IntegerDigits[#]]]&]] %o A316527 (Magma) [Fibonacci(n): n in [2..80] | not IsPrime(&+Intseq(Fibonacci(n)))]; %o A316527 (GAP) S:=List(List(List([2..60],Fibonacci),ListOfDigits),Sum);; %o A316527 a:=[];; for i in [1..Length(S)] do if not IsPrime(S[i]) then Add(a,Fibonacci(i+1)); fi; od; a:=Concatenation([0],a); # _Muniru A Asiru_, Jul 12 2018 %Y A316527 Complement of A065398 within A000045. %Y A316527 Cf. A178837. %K A316527 nonn,base %O A316527 1,3 %A A316527 _Vincenzo Librandi_, Jul 11 2018