Vielleicht hilft das ja weiter ....
Sum[x[[i]] + a, {i, 1, n}] // HoldForm //
# /.HoldForm@Sum[x_ + a, {i, 1, n}] :> a n + HoldForm@Sum[x, {i, 1, n}] &
Und an passender Stelle dann mal ReleaseHold[]
LG Robert
Am 17.10.2010 22:35, schrieb klamser:
> Hallo,
>
> wie kann ich MMA überreden aus
>
> Sum[x[[i]]+a,{i,1,n}]
>
> zu
>
> Sum[x[[i]],{i,1,n}]+a n
>
> umzuformen?
>
> Danke & eine gute Woche wünscht
>
> Peter
>
>
>
--
Dipl. Ing. (FH) Robert Nowak
IMS Nanofabrication AG
Phone: +43/12144894/32
Fax: +43/12144894/99
begin:vcard
fn:Robert Nowak
n:Nowak;Robert
org:IMS Nanofabrication AG;PGC
adr:;;Schreygasse 3;Wien;Wien;1020;Austria
email;internet:robert.nowak@XXXXXXX.at
title:Dipl. Ing. (FH)
tel;work:+43/12144894/32
tel;fax:+43/12144894/99
url:www.ims.co.at
version:2.1
end:vcard