Início / user-19254600

szmple's questions

Martin Hope
szmple
Asked: 2025-04-09 14:26:33 +0800 CST
  • 5

Tenho o seguinte quadro de dados que preciso classificar de uma maneira específica. D1 e C1 estão vinculados, D2 e ​​C2 estão vinculados, D3 e C3 estão vinculados. Preciso que as colunas D1, D2 e ​​D3 contenham apenas um valor único, com seu C# na coluna C... respeitosamente.

X = structure(list(D1 = c("A", "A", "A", "A", "A", "B", "B", "B", 
"B", "B", "C", "C", "C", "C", "C", "NA", "NA", "NA", "NA", "NA", 
"NA", "NA", "NA", "NA", "NA", "B", "B", "B", "B", "B"), C1 = c("1", 
"2", "3", "4", "5", "1", "2", "3", "4", "5", "1", "2", "3", "4", 
"5", "NA", "NA", "NA", "NA", "NA", "NA", "NA", "NA", "NA", "NA", 
"1", "2", "3", "4", "5"), D2 = c("NA", "NA", "NA", "NA", "NA", 
"A", "A", "A", "A", "A", "B", "B", "B", "B", "B", "C", "C", "C", 
"C", "C", "A", "A", "A", "A", "A", "NA", "NA", "NA", "NA", "NA"
), C2 = c("NA", "NA", "NA", "NA", "NA", "1", "2", "3", "4", "5", 
"1", "2", "3", "4", "5", "1", "2", "3", "4", "5", "1", "2", "3", 
"4", "5", "NA", "NA", "NA", "NA", "NA"), D3 = c("B", "B", "B", 
"B", "B", "NA", "NA", "NA", "NA", "NA", "NA", "NA", "NA", "NA", 
"NA", "A", "A", "A", "A", "A", "NA", "NA", "NA", "NA", "NA", 
"NA", "NA", "NA", "NA", "NA"), C3 = c("1", "2", "3", "4", "5", 
"NA", "NA", "NA", "NA", "NA", "NA", "NA", "NA", "NA", "NA", "1", 
"2", "3", "4", "5", "NA", "NA", "NA", "NA", "NA", "NA", "NA", 
"NA", "NA", "NA")), class = c("tbl_df", "tbl", "data.frame"), row.names = c(NA, 
-30L))

Meu formato de saída esperado é este:

Y = structure(list(D1 = c("A", "A", "A", "A", "A", "A", "A", "A", 
"A", "A", "NA", "NA", "NA", "NA", "NA", "A", "A", "A", "A", "A", 
"A", "A", "A", "A", "A", "NA", "NA", "NA", "NA", "NA"), C1 = c("1", 
"2", "3", "4", "5", "1", "2", "3", "4", "5", "NA", "NA", "NA", 
"NA", "NA", "1", "2", "3", "4", "5", "1", "2", "3", "4", "5", 
"NA", "NA", "NA", "NA", "NA"), D2 = c("B", "B", "B", "B", "B", 
"B", "B", "B", "B", "B", "B", "B", "B", "B", "B", "NA", "NA", 
"NA", "NA", "NA", "NA", "NA", "NA", "NA", "NA", "B", "B", "B", 
"B", "B"), C2 = c("1", "2", "3", "4", "5", "1", "2", "3", "4", 
"5", "1", "2", "3", "4", "5", "NA", "NA", "NA", "NA", "NA", "NA", 
"NA", "NA", "NA", "NA", "1", "2", "3", "4", "5"), D3 = c("NA", 
"NA", "NA", "NA", "NA", "NA", "NA", "NA", "NA", "NA", "C", "C", 
"C", "C", "C", "C", "C", "C", "C", "C", "NA", "NA", "NA", "NA", 
"NA", "NA", "NA", "NA", "NA", "NA"), C3 = c("NA", "NA", "NA", 
"NA", "NA", "NA", "NA", "NA", "NA", "NA", "1", "2", "3", "4", 
"5", "1", "2", "3", "4", "5", "NA", "NA", "NA", "NA", "NA", "NA", 
"NA", "NA", "NA", "NA")), class = c("tbl_df", "tbl", "data.frame"
), row.names = c(NA, -30L))
Martin Hope
szmple
Asked: 2024-11-26 21:00:38 +0800 CST
  • 5

Estou tentando criar algumas curvas de dose-resposta para um experimento que fiz. Para um dos DRC's, estou recebendo o seguinte erro:

Error in optim(startVec, opfct, hessian = TRUE, method = optMethod, control = list(maxit = maxIt,  : 
  non-finite finite-difference value [4]
Error in drmOpt(opfct, opdfct1, startVecSc, optMethod, constrained, warnVal,  : 
  Convergence failed

este é o conjunto de dados para este exemplo:

test <-data.frame(value1 = c(30000, 7500, 1875, 469, 117, 29.3, 7.32, 1.83, 0.458),value2= c(0.817, 0.773, 0.811, 0.861, 0.833, 0.904, 0.903, 0.875, 1.07))

e com o seguinte código para reproduzir o erro.

drm(data = test, value2 ~ value1,fct=LL.4(names = c("Slope","LowerLimit","UpperLimit", "ED50")))

o que está errado aqui? Muito obrigado antecipadamente