Message-ID: <CAMUSX8ptu+b=SFZAA+FQw4aPfu5eqzgWTVHkCuRm92Xj9srqcA@mail.gmail.com>
Date: 2018-11-20T12:09:47Z
From: Engin Yılmaz
Subject: system solver in R
In-Reply-To: <CAMUSX8r5c=PemFaD1Ew5Q-2czvbPgk7kEj7vocqZV76POFvksQ@mail.gmail.com>
Dea(R)
I try to solve one equation but this program did not give me real roots
for example
yacas("Solve( 5/((1+x)^1) + 5/((1+x)^2) + 5/((1+x)^3) + 105/((1+x)^4) -105
==0, x)")
gave me following results
How can I find real roots?
expression(list(x == complex_cartesian((1/42 - ((1/63 -
((root(7339451281/3087580356,
2) - 4535/71442)^(1/3) - (4535/71442 + root(7339451281/3087580356,
2))^(1/3)))/21 - -2/21)/(4 * root(((root(7339451281/3087580356,
2) - 4535/71442)^(1/3) - (4535/71442 + root(7339451281/3087580356,
2))^(1/3) - 1/63)^2/4 + 1, 2)))/2 - 1, root(4 *
(((root(7339451281/3087580356,
2) - 4535/71442)^(1/3) - (4535/71442 + root(7339451281/3087580356,
2))^(1/3) - 1/63)/2 + root(((root(7339451281/3087580356,
2) - 4535/71442)^(1/3) - (4535/71442 + root(7339451281/3087580356,
2))^(1/3) - 1/63)^2/4 + 1, 2)) - (((1/63 -
((root(7339451281/3087580356,
2) - 4535/71442)^(1/3) - (4535/71442 + root(7339451281/3087580356,
2))^(1/3)))/21 - -2/21)/(4 * root(((root(7339451281/3087580356,
2) - 4535/71442)^(1/3) - (4535/71442 + root(7339451281/3087580356,
2))^(1/3) - 1/63)^2/4 + 1, 2)) - 1/42)^2, 2)/2),...more
Engin Y?lmaz <ispanyolcom at gmail.com>, 20 Kas 2018 Sal, 12:53 tarihinde ?unu
yazd?:
> Thanks a lot!
>
> Berend Hasselman <bhh at xs4all.nl>, 20 Kas 2018 Sal, 12:02 tarihinde ?unu
> yazd?:
>
>>
>>
>> R package Ryacas may be what you want.
>>
>> Berend
>>
>>
>> > On 20 Nov 2018, at 09:42, Engin Y?lmaz <ispanyolcom at gmail.com> wrote:
>> >
>> > Dea(R)
>> >
>> > Do you know any system solver in R ?
>> >
>> > For example, in matlab, is very easy
>> >
>> > syms a b c x eqn = a*x^2 + b*x + c == 0; sol = solve(eqn)
>> >
>> > How can I find this type code in R (or directly solver)?
>> >
>> > *Since(R)ely*
>> > Engin YILMAZ
>> >
>> > [[alternative HTML version deleted]]
>> >
>> > ______________________________________________
>> > R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see
>> > https://stat.ethz.ch/mailman/listinfo/r-help
>> > PLEASE do read the posting guide
>> http://www.R-project.org/posting-guide.html
>> > and provide commented, minimal, self-contained, reproducible code.
>>
>>
>
> --
> *Sayg?lar?mla*
> Engin YILMAZ
>
--
*Sayg?lar?mla*
Engin YILMAZ
[[alternative HTML version deleted]]