# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a062738
Showing 1-1 of 1

%I A062738 #25 Aug 03 2014 14:29:46
%S A062738 1,2,12,432,61344,32866560,68307743232,561981464819712,
%T A062738 18437720675374485504,2417519433343618432696320,
%U A062738 1267602236528793479228867346432,2658428102191640176274135259655176192,22300681394917309655766001890404571062206464
%N A062738 Number of connected labeled relations.
%C A062738 a(n) is the number of binary relations R on {1, 2, ..., n} such that the reflexive, symmetric, and transitive closure of R is the trivial relation.
%H A062738 T. D. Noe, <a href="/A062738/b062738.txt">Table of n, a(n) for n = 0..30</a>
%F A062738 E.g.f.: 1+log( Sum_{n >= 0} 2^(n^2)*x^n/n! ).
%p A062738 a:= n-> n!*coeff(series(1+log(add(2^(i^2)*x^i/i!, i=0..n)), x, n+1), x, n):
%p A062738 seq(a(n), n=0..30); # _Alois P. Heinz_, Feb 16 2011
%t A062738 nn = 20; a = Sum[2^(n^2) x^n/n!, {n, 0, nn}]; Range[0, nn]! CoefficientList[Series[Log[a] + 1, {x, 0, nn}], x] (* _Geoffrey Critzer_, Oct 17 2011 *)
%o A062738 (PARI) v=Vec(1+log(sum(n=0,10,2^(n^2)*x^n/n!)));for(i=1,#v,v[i]*=(i-1)!);v \\ _Charles R Greathouse IV_, Feb 14 2011
%Y A062738 Cf. A003027.
%K A062738 easy,nonn
%O A062738 0,2
%A A062738 _Vladeta Jovovic_, Jul 12 2001

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE