Описание тега uniroot

Вопросы с тегом
0 ответов

Ограничения nsga2 - пакет mco в R

Моя целевая функция учитывает длину дуги эллипса. В рамках целевой функции я использую uniroot, чтобы найти малую полуось b для большой полуоси a и угол дуги, предоставленный nsga. Я написал функцию ограничения, чтобы гарантировать, что ограничения,…
29 июн '20 в 19:44
1 ответ

Как я могу решить нелинейное уравнение в R и функцию uniroot

Как я могу найти значение x, используя R для уравнения a(x^b)+k*log(1+(x^c))+log(1-(u^(1/d)))=0 для ценностей u=0.1,c=0.8,k=1.2,d=1.5,a=0.9,b=1Они получили ответ как 0,0539. Но я не получил этого ответа.
09 апр '20 в 10:25
1 ответ

функция uniroot() в исходном коде не работает с модификацией; Не удалось выяснить ошибку

Я пытался узнать координаты пересечения двух кривых в R. Входные данные - это координаты эмпирических точек из двух кривых. Мое решение - использовать функцию curve_intersect(). Мне нужно сделать это для 2000 повторений (т.е. 2000 пар кривых). Итак,…
11 сен '20 в 21:25
1 ответ

решение уравнений с переменными с обеих сторон с r

0,5Q+ ​​30 = -0,2Q + 100 0,5q+0,2q = 100-30 70 = 0,7q q = 70 / 0,7 q = 100 0,5* 100 + 30 = 80 Есть ли пакет, который решает уравнения с переменными с обеих сторон?
09 сен '20 в 01:34
0 ответов

R uniroot: решение неизвестной переменной в uniroot из функции с несколькими аргументами

Я пытаюсь получить значение переменной, находящейся в журнале, с помощью функции uniroot. В функции с уравнением, которое я хочу решить, я хочу иметь аргумент вектора, чтобы я мог умножать значения из этого вектора на каждый журнал. Я попробовал мет…
17 ноя '20 в 17:05
1 ответ

Uniroot в симуляциях

Я пытаюсь найти значение, генерирующее совокупную сумму функции, равную 0 (или ближайшему к 0 значению). У меня простая формула: x - y(1-z), где z - ключевая переменная. Проблема в том, что x и y моделируются, поэтому они не остаются постоянными. Во…
20 фев '21 в 01:51
0 ответов

Uniroot внутри uniroot в R

мне нужно сделать следующее: мне нужно найти корень (y) следующим образом: func1 = function(x){function2(x)-y} finalResult=uniroot(func1, range1) Проблема в том, что function2 определяется как: function2(x){ function3(z)-x intermediateResult=uniroot…
21 апр '21 в 18:41
1 ответ

Найти root с помощью uniroot

Я пытаюсь найти корень следующей функции (на основе гаммы ( gamma()) function) с помощью функции: cv = 0.056924/1.024987^2 fx2 = function(theta, eta){ p1 = 1 - 2/(theta*(1-eta)) p2 = 1 - 1/(theta*(1-eta)) return(( gamma(p1)/(gamma(p2))^2 ) - (cv+1) …
17 июн '21 в 23:09
2 ответа

R: Решение для переменной (с использованием функции uniroot)

Я новичок в R и действительно могу нуждаться в помощи сообщества в следующей проблеме. Я пытаюсь найти переменную r в следующем уравнении: (EPS2 + r*DPS1-EPS1) / r ^2)-PRC . Вот моя (неудачная) попытка решить проблему (с помощью функции uniroot): EP…
19 июн '21 в 00:03
0 ответов

ошибка в uniroot () в R, f.lower = f (lower) - NA + фактический пример

вот мой код, a3<- c(-1141591.0, -1192686.3, -402424.1, -418201.6, -439137.0, -654150.5, -670148.4 , -696922.9, -719566.3, -766338.7, -794186.4 ,-812940.5, -835722.0, -856374.3) a2<- c(271925.56, 284085.61, 95976.92, 99656.88, 104595.08, 156220…
22 июл '21 в 23:32
1 ответ

Uniroot Верхнее и Нижнее значения в R

Я пытаюсь найти решение следующего, используя uniroot() в . library(rootSolve) set.seed(2) y=rgamma(10,5,2) myfun=function(y,t)as.numeric(integrate(function(x){ ((x^4) * exp(-x/2))/768 },0,upper=2)[1])-t myfun(y, y) final_fun=function(y)uniroot(myfu…
01 авг '21 в 04:29
0 ответов

Я хочу построить график этой функции, но получаю «Ошибка в uniroot(L, lower = 0, upper = 1e+05): значения f() в конечных точках не противоположного знака»

find.c<-function(p){ L<- function(Q,x=p){ Const <- log(16.1) ConstP <- log(15.1+Q)*(0.144)+log(14.1+Q)*(0.0064)+log(8.1+Q)*(0.0032) X <- log(16.1+Q)*(0.81+x)+log(2.1+Q)*(0.0004+x) X + ConstP - Const #This is derived from the principl…
01 авг '21 в 14:28
1 ответ

Решение уравнения с использованием uniroot в R

Error in uniroot(f.mu3, interval = c(lower, upper)) : f.upper = f(upper) is NA In addition: Warning message: In sqrt((d[4] * mvec[4] * n - m * mu)^2 - 4 * d[4] * nvec[4] * n * : NaNs produced Я пытаюсь найти решение сложной функции, используя uniro…
24 авг '21 в 04:37
1 ответ

Как я могу избежать ошибки uniroot, которая останавливает цикл?

Я выполняю функцию в цикле, но получаю ошибку, и код останавливается. Код приведен ниже; func <-function(f) -a*b/c*0.5*d*e^2 + (d/f-1)*g*sin(h*(pi/180))-i dat <- data.frame(a = c(0.99,0.99,0.99), b = c(0.1986572,0.1986572,0.1986572), c = c(237…
02 дек '21 в 16:14
1 ответ

Как избежать ошибки uniroot, которая останавливает цикл [дубликат]

Я выполняю функцию в цикле, но получаю ошибку, и код останавливается. Код приведен ниже; func <-function(f) -a*b/c*0.5*d*e^2 + (d/f-1)*g*sin(h*(pi/180))-i dat <- data.frame(a = c(0.99,0.99,0.99), b = c(0.1986572,0.1986572,0.1986572), c = c(237…
03 дек '21 в 18:41
1 ответ

Функция R "uniroot": получить ошибку

FX <- function(x)(3/4)*(1-x^2) M <- 5000 X2 <- rep(NA,M) for (i in 1:M) { U2 <- runif(1) fct <- function(x)FX(x)-U2 X2[i] <- uniroot(fct,c(-1,1))$root } Я пытался сделать этот R-код, но каждый раз получаю сообщение об ошибке: Ошиб…
30 ноя '21 в 21:54
0 ответов

Проблема с получением YTM с помощью функции uniroot

Я пытаюсь вычислить доходность к погашению, но ответ для приведенной ниже функции странный... Правильный ответ, на который я смотрю... get_ytm(100,3,0.04,4,108.8516) ---> 0,01 Кто-нибудь может исправить мое недоразумение? get_ytm <- function(F…
12 мар '21 в 16:25
0 ответов

Интегрирование по корню в R

Я построил модель, которая, к сожалению, не дает аналитических решений для некоторых переменных, поэтому мне нужно решить ее численно для каждого значения. Как я могу интегрировать функцию, которая должна найти корень для каждой точки интервала? То …
09 янв '21 в 14:26
2 ответа

Решите для X построчно

Начну с того, что я уже сделал. Я ищу способ решить уравнение f , изменив параметры b и s для каждой строки, Q и n являются константами. Я знаю, что apply() работает для такого типа проблем, но, похоже, это не работает для меня. Переменная, которую …
08 дек '20 в 22:11
0 ответов

Ошибка в uniroot(LR, c(xmin, mean(x)), lambda = lambda): Знак f() на краю полюса не противоположен

Продолжайте с вопросом Как определить функцию f_n-chi-square и использовать uniroot для определения доверительного интервала? я сначала получу свой f_nследующим образом. set.seed(201111) theta_seq = seq(from = 3, to = 16, by = 0.01) f_n = rep(NA, le…
28 мар '22 в 13:37