Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]
Groups > comp.soft-sys.math.maple > #1230
| From | "G. A. Edgar" <edgar@math.ohio-state.edu.invalid> |
|---|---|
| Newsgroups | comp.soft-sys.math.maple |
| Subject | Re: Hypergeom -- simplify versus evalf |
| Date | 2017-01-10 07:03 -0700 |
| Organization | Ohio State Univ |
| Message-ID | <100120170703345972%edgar@math.ohio-state.edu.invalid> (permalink) |
| References | <dbf67327-673a-4ae4-b931-b6388e87925c@googlegroups.com> |
In article <dbf67327-673a-4ae4-b931-b6388e87925c@googlegroups.com>,
Peter Luschny <peter.luschny@gmail.com> wrote:
> a := (n,k) -> -(-1)^k*hypergeom([1-k,n/2+1/2,n/2],[1/2,1],1):
>
> for n from 1 to 6 do seq(simplify(a(n,k)),k=1..n) od;
> for n from 1 to 6 do seq(round(evalf(a(n,k))),k=1..n) od;
>
> 1
> 1, 2
> 1, 1, 4
> 1, 4, 16, 8
> 1, 2, 41, 44, 16
> 1, 6, 85, 146, 112, 32
>
> 1
> 1, 2
> 1, 5, 4
> 1, 9, 16, 8
> 1, 14, 41, 44, 16
> 1, 20, 85, 146, 112, 32
>
> ?
a := (n,k) -> -(-1)^k*hypergeom([1-k,n/2+1/2,n/2],[1/2,1],1):
for n from 1 to 6 do seq(simplify(a(n,k)),k=1..n) od;
for n from 1 to 6 do seq(round(evalf(a(n,k))),k=1..n) od;
1
1, 2
1, 5, 4
1, 9, 16, 8
1, 14, 41, 44, 16
1, 20, 85, 146, 112, 32
1
1, 2
1, 5, 4
1, 9, 16, 8
1, 14, 41, 44, 16
1, 20, 85, 146, 112, 32
version();
User Interface: 1097895
Kernel: 1097895
Library: 1097895
1097895
--
G. A. Edgar http://www.math.ohio-state.edu/~edgar/
Back to comp.soft-sys.math.maple | Previous | Next — Previous in thread | Find similar
Hypergeom -- simplify versus evalf Peter Luschny <peter.luschny@gmail.com> - 2017-01-10 05:51 -0800 Re: Hypergeom -- simplify versus evalf "G. A. Edgar" <edgar@math.ohio-state.edu.invalid> - 2017-01-10 07:03 -0700
csiph-web