2012-07-22 49 views
0

给定一组(x,y)坐标,如何从y求解x。如果要绘制坐标,它们将是非线性的,但非常接近指数。我尝试了approx(),但它是离开的。这里是示例数据。在这种情况下,我如何解决y == 50给定数据点和y值,给出x值

V1  V3 

1 5.35 11.7906

2 10.70 15.0451

3 16.05 19.4243

4 21.40 20.7885

5 26.75 22.0584

6 32.10 25.4367

7 37.45 28.6701

8 42.80 30.7500

9 48.15 34.5084

10 53.50 37.0096

11 58.85 39.3423

12 64.20 41.5023

13 69.55 43.4599

14 74.90 44.7299

15 80.25 46.5738

16 85.60 47.7548

17 90.95 49.9749

18 96.30 51.0331

19 101.65 52.0207

20 107.00 52.9781

21 112.35 53.8730

22 117.70 54.2907

23 123.05 56.3025

24 128.40 56.6949

25 133.75 57.0830

26 139.10 58.5051

27 144.45 59.1440

28 149.80 60.0687

29 155.15 60.6627

30 160.50 61.2313

31 165.85 61。7748

32 171.20 62.5587

33 176.55 63.2684

34 181.90 63.7085

35 187.25 64.0788

36 192.60 64.5807

37 197.95 65.2233

38 203.30 65.5331

39 208.65 66.1200

40 214.00 66.6208

41 219.35 67.1952

42 224.70 67.5270

43 230.05 68.0175

44 235.40 68.3869

45 240.75 68.7485

46 246.10 69.1878

47 251.45 69.3980

48 256.80 69.5899

49 262.15 69.7382

50 267.50 69.7693

51 272.85 69.7693

52 278.20 69.7693

53 283.55 69.7693

54 288.90 69.7693

+0

有没有为您的wh数据帧的行ich'y == 50',所以你将不得不做一些插值。将模型拟合到您的数据并从此继续。 – 2012-07-22 03:55:12

回答

1

我想你的问题是,approx解决了y给出x,当你在谈论解决给定yx。所以,你需要切换你的变量xy使用approx时:

df <- read.table(textConnection(" 

V1  V3 
85.60 47.7548 
90.95 49.9749 
96.30 51.0331 
101.65 52.0207 

"), header = TRUE) 

approx(x = df$V3, y = df$V1, xout = 50) 
# $x 
# [1] 50 
# 
# $y 
# [1] 91.0769 

而且,如果y是指数相对于x,那么你有xlog(y)之间的线性关系,因此它更有意义使用xlog(y)之间的线性内插,然后采取指数要回y

exp(approx(x = df$V3, y = log(df$V1), xout = 50)$y) 
# [1] 91.07339 
+0

哇多么尴尬。我绝对转换了x和y。这就是我喝酒和编程所得到的:) – user1177193 2012-07-22 13:06:19

相关问题