The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A195399

(Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing all changes.

A195399

Decimal expansion of shortest length, (A), of segment from side AB through incenter to side AC in right triangle ABC with sidelengths (a,b,c)=(sqrt(7),3,4).
(history; published version)

#10 by Alois P. Heinz at Sat May 13 14:27:28 EDT 2017

STATUS

proposed

approved

#9 by Eric Rowland at Sat May 13 13:36:19 EDT 2017

STATUS

editing

proposed

#8 by Eric Rowland at Sat May 13 13:36:14 EDT 2017

MATHEMATICA

RealDigits[%] (* (C) A1953401 A195401 *)

STATUS

approved

editing

Discussion

Sat May 13

13:36

Eric Rowland: Fix sequence number

#7 by Russ Cox at Fri Mar 30 18:57:45 EDT 2012

AUTHOR

_Clark Kimberling (ck6(AT)evansville.edu), _, Sep 17 2011

Discussion

Fri Mar 30

18:57

OEIS Server: https://oeis.org/edit/global/285

#6 by T. D. Noe at Sat Sep 17 20:17:59 EDT 2011

STATUS

proposed

approved

#5 by Clark Kimberling at Sat Sep 17 17:17:58 EDT 2011

STATUS

editing

proposed

#4 by Clark Kimberling at Sat Sep 17 15:58:01 EDT 2011

MATHEMATICA

RealDigits[%] (* (A) A195407 A195399 *)

RealDigits[%] (* (B) A195408 A195400 *)

RealDigits[%] (* (C) A1953409 A1953401 *)

RealDigits[%] (* Philo(ABC, I) A195410 A195402 *)

CROSSREFS

Cf. A195284, A195408, A195409, A195410A195400, A195401, A195402.

#3 by Clark Kimberling at Sat Sep 17 15:51:46 EDT 2011

NAME

Decimal expansion of shortest length, (A), of segment from side AB through incenter to side AC in right triangle ABC with sidelengths (a,b,c)=(2,sqrt(57),3,4).

DATA

1, 7, 5, 9, 3, 8, 2, 3, 1, 6, 9, 0, 5, 7, 0, 9, 6, 4, 9, 9, 2, 5, 5, 8, 8, 6, 5, 1, 4, 9, 9, 6, 3, 5, 2, 4, 9, 0, 0, 3, 8, 2, 0, 7, 3, 6, 0, 9, 2, 4, 7, 3, 5, 2, 1, 7, 4, 3, 3, 8, 9, 9, 0, 9, 1, 3, 8, 8, 5, 4, 5, 5, 9, 4, 0, 5, 2, 6, 6, 1, 3, 9, 5, 7, 5, 1, 0, 5, 7, 5, 6, 7, 9, 8, 4, 7, 1, 7, 2, 2, 4, 2, 3, 6, 9, 1, 5, 9, 5, 8, 7, 8, 9, 4, 2, 1, 0, 7, 7, 9, 3, 7, 2, 4, 3, 5, 5, 4, 2, 1, 6, 8, 6, 5, 2, 7, 1, 7, 1, 8, 3, 4, 1, 3, 0, 7, 2, 2, 0, 4, 6, 9, 6

EXAMPLE

(A)=1.3231690764992149954030736247352174899975938215709649255886516352490038207092333...

MATHEMATICA

a = 2; b = Sqrt[57]; c b = 3; c = 4;

RealDigits[%] (* (A) A195399 A195407 *)

RealDigits[%] (* (B) A195400 A195408 *)

RealDigits[%] (* (C) A1953401 A1953409 *)

RealDigits[%] (* Philo(ABC, I) A195402 A195410 *)

CROSSREFS

Cf. A195284, A195400, A195401, A195402A195408, A195409, A195410.

KEYWORD

nonn,cons,changed

#2 by Clark Kimberling at Sat Sep 17 15:43:17 EDT 2011

NAME

allocated for Clark KimberlingDecimal expansion of shortest length, (A), of segment from side AB through incenter to side AC in right triangle ABC with sidelengths (a,b,c)=(2,sqrt(5),3).

DATA

1, 3, 2, 3, 1, 6, 9, 0, 7, 6, 4, 9, 9, 2, 1, 4, 9, 9, 5, 4, 0, 3, 0, 7, 3, 6, 2, 4, 7, 3, 5, 2, 1, 7, 4, 8, 9, 9, 9, 5, 4, 9, 4, 0, 5, 6, 1, 3, 9, 5, 5, 1, 0, 5, 7, 5, 7, 9, 8, 4, 7, 1, 7, 2, 2, 4, 2, 3, 1, 5, 9, 5, 8, 7, 8, 9, 4, 2, 1, 0, 7, 7, 7, 2, 4, 1, 5, 1, 1, 8, 3, 4, 1, 3, 0, 7, 2, 2, 0, 9

OFFSET

1,2

COMMENTS

See A195284 for definitions and a general discussion.

EXAMPLE

(A)=1.32316907649921499540307362473521748999...

MATHEMATICA

a = 2; b = Sqrt[5]; c = 3;

f = 2 a*b/(a + b + c);

x1 = Simplify[f*Sqrt[a^2 + (b + c)^2]/(b + c) ]

x2 = Simplify[f*Sqrt[b^2 + (c + a)^2]/(c + a) ]

x3 = f*Sqrt[2]

N[x1, 100]

RealDigits[%] (* (A) A195399 *)

N[x2, 100]

RealDigits[%] (* (B) A195400 *)

N[x3, 100]

RealDigits[%] (* (C) A1953401 *)

N[(x1 + x2 + x3)/(a + b + c), 100]

RealDigits[%] (* Philo(ABC, I) A195402 *)

CROSSREFS

Cf. A195284, A195400, A195401, A195402.

KEYWORD

allocated

nonn,cons

AUTHOR

Clark Kimberling (ck6(AT)evansville.edu), Sep 17 2011

STATUS

approved

editing

#1 by Clark Kimberling at Sat Sep 17 14:23:12 EDT 2011

NAME

allocated for Clark Kimberling

KEYWORD

allocated

STATUS

approved