我想在大型光谱数据集上使用积分来确定特定光谱范围内的表面。
fx.linear <- approxfun(DataSg$Wavelength,DataSg$Y_Cl_Egg14)
Fx.linear <- integrate(fx.linear, 565, 581)
DATA <- data.frame(method='linear', area=Fx.linear$value, error=Fx.linear$abs.error)
这完全适用于一列,但是如何使用apply或除循环以外的其他函数将其应用于所有列。
我尝试使用apply在更大的数据集上应用集成,但不知道如何操作。在该行的工作代码下方的部分数据下方。
DF
Wavelength Y_Cl_Egg14 Y_Cl_Egg17 Y_Cl_Egg23 Y_Cl_Egg26 R_Cl_Egg9
Idx70 439.93 -819925 -1776291-1021460 -923041 -1147120
Idx71 440.22 -803629 -1744927-1001994 -904840 -1125376
Idx72 440.51 -785734 -1710888-980943 -885337 -1101586
Idx73 440.80 -766464 -1673877-958572 -864156 -1076137
Idx74 441.09 -746432 -1634109-935531 -842152 -1049658
Idx75 441.38 -725278 -1591963-911228 -818894 -1021455
Idx76 441.67 -703425 -1547714-885490 -794903 -991200
Idx77 441.96 -680519 -1501346-858068 -769327 -958902
Idx78 442.25 -656709 -1453417-829675 -743050 -925867
Idx79 442.54 -631425 -1402839-799434 -715475 -891240
Idx80 442.83 -604814 -1350543-767777 -687448 -855969
Idx81 443.12 -577808 -1295285-734580 -658005 -819497
Idx82 443.41 -550384 -1238327-701138 -627935 -781940
Idx83 443.70 -522242 -1179647-666753 -597065 -743468
Idx84 443.99 -493519 -1119316-631424 -565437 -704107
Idx85 444.28 -464302 -1057485-595243 -533142 -663934
Idx86 444.57 -434654 -994405 -558281 -500253 -622978
Idx87 444.86 -404665 -930235 -520733 -466866 -581490
Idx88 445.16 -374380 -865109 -482750 -433055 -539531
Idx89 445.45 -343922 -799195 -444366 -398917 -497209
Idx90 445.74 -313270 -732664 -405669 -364433 -454561
Idx91 446.03 -282552 -665721 -366771 -329728 -411625
Idx92 446.32 -251724 -598527 -327711 -294836 -368395
Idx93 446.61 -220814 -531341 -288657 -259938 -325090
Idx94 446.90 -189974 -464333 -249677 -225098 -281786
Idx95 447.19 -159237 -397748 -210969 -190377 -238586
Idx96 447.48 -128718 -331716 -172608 -155817 -195552
Idx97 447.77 -98506 -266496 -134896 -121580 -152942
Idx98 448.06 -68741 -202231 -97895 -87762 -110897
Idx99 448.35 -39591 -139071 -61766 -54484 -69607
Idx100 448.64 -11053 -77068 -26475 -21820 -29122
Idx101 448.93 16851 -16349 7912 10124 10407
Idx102 449.22 44029 42960 41329 41319 48974
Idx103 449.51 70410 100805 73755 71684 86425
Idx104 449.80 95993 157060 105045 101137 122604
Idx105 450.09 120704 211617 135151 129645 157399
Idx106 450.38 144494 264339 164121 157174 190749
Idx107 450.67 167167 315083 191911 183571 222646
Idx108 450.96 188701 363683 218578 208778 253086
Idx109 451.25 209097 409997 244084 232715 281941
Idx110 451.54 228432 453911 268441 255374 309281
Idx111 451.83 246735 495438 291640 276729 335080
Idx112 452.12 264010 534521 313675 296853 359436
Idx113 452.41 280290 571278 334468 315645 382278
Idx114 452.70 295585 605590 354017 333054 403640
Idx115 452.99 309858 637440 372321 348979 423531
Idx116 453.28 323049 666647 389385 363470 441939
Idx117 453.57 335145 693224 405087 376604 458829
Idx118 453.86 346015 717189 419356 388393 474221
Idx119 454.15 355672 738588 432073 398899 488114
Idx120 454.44 364109 757422 443343 408087 500511
Idx121 454.73 371344 773699 453100 415946 511420
Idx122 455.02 377496 787599 461357 422490 520799
Idx123 455.31 382592 799288 468150 427812 528732
Idx124 455.60 386736 809016 473619 432081 535254
Idx125 455.89 389913 816896 477780 435277 540405
Idx126 456.18 392159 823052 480729 437530 544206
Idx127 456.47 393463 827517 482490 438827 546633
Idx128 456.76 393865 830351 483090 439161 547766
Idx129 457.05 393410 831520 482706 438645 547711
Idx130 457.33 392146 831038 481374 437273 546534
Idx131 457.62 390073 828925 479189 435090 544275
Idx132 457.91 387341 825306 476151 432171 541021
Idx133 458.20 384082 820313 472360 428617 536816
Idx134 458.49 380358 814087 467871 424484 531753
Idx135 458.78 376182 806768 462717 419759 525908
Idx136 459.07 371597 798410 456863 414431 519288
Idx137 459.36 366670 789167 450373 408588 511953
Idx138 459.65 361422 779010 443367 402249 504016
Idx139 459.94 355777 768007 435967 395533 495596
Idx140 460.23 349739 756178 428276 388591 486765
Idx141 460.52 343337 743669 420251 381479 477552
Idx142 460.81 336654 730532 411995 374254 468134
Idx143 461.10 329770 716801 403640 366928 458574
Idx144 461.39 322843 702633 395319 359509 448981
Idx145 461.68 316033 688212 387069 352058 439368
Idx146 461.97 309354 673722 378925 344638 429720
Idx147 462.26 302752 659203 370953 337193 420048
Idx148 462.54 296170 644752 363193 329765 410370
Idx149 462.83 289626 630422 355639 322321 400804
Idx150 463.12 283139 616293 348312 314999 391449
Idx151 463.41 276627 602395 341207 307691 382335
Idx152 463.70 270180 588782 334417 300457 373413
Idx153 463.99 263764 575410 327915 293278 364679
Idx154 464.28 257365 562305 321571 286139 356104
Idx155 464.57 251094 549520 315330 279100 347680
Idx156 464.86 244916 537084 309111 272225 339400
Idx157 465.15 238943 525129 302976 265527 331358
Idx158 465.44 233140 513615 296942 259025 323624
Idx159 465.73 227571 502603 291049 252664 316272
Idx160 466.01 222247 492103 285241 246534 309253
Idx161 466.30 217136 482223 279604 240706 302639
Idx162 466.59 212275 472945 274126 235172 296454
Idx163 466.88 207602 464224 268917 229926 290721
Idx164 467.17 203227 456011 263988 225060 285412
Idx165 467.46 199109 448332 259427 220566 280547
Idx166 467.75 195333 441216 255222 216482 276193
Idx167 468.04 191959 434687 251463 212727 272395
Idx168 468.33 189026 428889 248164 209366 269143
Idx169 468.61 186453 423721 245265 206391 266352
Idx170 468.90 184203 419156 242705 203741 263939
Idx171 469.19 182166 415093 240519 201381 261849
Idx172 469.48 180373 411602 238690 199346 260150
Idx173 469.77 178783 408680 237209 197744 258935
Idx174 470.06 177431 406370 236088 196587 258121
Idx175 470.35 176274 404637 235363 195831 257621
Idx176 470.64 175416 403449 235040 195409 257393
Idx177 470.93 174860 402744 235049 195275 257513
Idx178 471.21 174633 402585 235324 195462 257959
Idx179 471.50 174763 403083 235943 196002 258781
Idx180 471.79 175252 404201 236890 196923 259978
Idx181 472.08 176077 405876 238294 198202 261598
Idx182 472.37 177142 408016 240034 199749 263541
Idx183 472.66 178497 410723 242060 201516 265729
Idx184 472.95 180117 413995 244318 203603 268177
Idx185 473.23 181950 417755 246851 205958 270849
Idx186 473.52 184017 421974 249677 208575 273763
Idx187 473.81 186291 426621 252792 211352 276889
Idx188 474.10 188769 431761 256142 214357 280243
Idx189 474.39 191422 437236 259697 217556 283816
Idx190 474.68 194222 443034 263378 220942 287577
Idx191 474.97 197192 449043 267128 224505 291566
Idx192 475.25 200333 455226 270917 228285 295659
Idx193 475.54 203620 461497 274758 232271 299803
Idx194 475.83 206930 467840 278593 236429 303974
Idx195 476.12 210207 474287 282438 240727 308192
Idx196 476.41 213445 480795 286257 245156 312504
Idx197 476.70 216666 487367 290063 249710 316903
Idx198 476.98 219914 494015 293823 254306 321378
Idx199 477.27 223228 500796 297676 258885 325920
Idx200 477.56 226697 507650 301643 263364 330468
Idx201 477.85 230334 514735 305668 267809 335114
Idx202 478.14 234101 522012 309746 272307 339873
Idx203 478.42 237888 529414 313799 276920 344685
Idx204 478.71 241607 536706 317871 281610 349462
Idx205 479.00 245272 543872 321928 286290 354217
Idx206 479.29 248876 551021 325961 290972 359005
Idx207 479.58 252528 558211 329983 295644 363831
Idx208 479.87 256167 565402 334008 300388 368606
Idx209 480.15 259831 572554 338029 305119 373289
Idx210 480.44 263460 579698 342014 309875 377893
Idx211 480.73 267089 586790 345958 314573 382432
Idx212 481.02 270657 593786 349802 319181 386845
Idx213 481.31 274202 600572 353537 323665 391097
Idx214 481.59 277645 607136 357108 328039 395180
Idx215 481.88 280959 613488 360555 332270 399112
Idx216 482.17 284073 619612 363870 336326 402910
Idx217 482.46 286961 625498 367042 340153 406639
Idx218 482.75 289527 630963 369993 343698 410193
Idx219 483.03 291822 636075 372718 346982 413567
Idx220 483.32 293923 640753 375211 350028 416733
Idx221 483.61 295885 645160 377493 352901 419712
Idx222 483.90 297686 649293 379566 355644 422550
Idx223 484.19 299305 653125 381548 358251 425174
Idx224 484.47 300719 656630 383433 360814 427637
Idx225 484.76 301955 659734 385190 363299 429965
Idx226 485.05 303036 662318 386716 365675 432114
Idx227 485.34 303914 664390 388012 367908 433938
Idx228 485.62 304567 665960 389174 369969 435512
Idx229 485.91 305048 667137 390221 371877 436792
Idx230 486.20 305379 668003 391104 373533 437778
Idx231 486.49 305558 668469 391775 374961 438398
Idx232 486.77 305602 668595 392237 376183 438680
Idx233 487.06 305536 668314 392545 377177 438630
Idx234 487.35 305381 667754 392798 377966 438303
Idx235 487.64 305137 666868 392975 378527 437634
Idx236 487.93 304801 665660 392956 378764 436676
Idx237 488.21 304351 664111 392720 378678 435361
Idx238 488.50 303740 662204 392174 378299 433695
Idx239 488.79 302945 659945 391371 377652 431708
Idx240 489.08 301895 657125 390170 376666 429405
Idx241 489.36 300546 653726 388485 375276 426796
Idx242 489.65 298959 649707 386303 373514 423745
Idx243 489.94 297145 645294 383663 371463 420319
Idx244 490.23 295117 640514 380650 369204 416533
Idx245 490.51 292813 635324 377297 366672 412450
Idx246 490.80 290195 629618 373637 363904 407983
Idx247 491.09 287273 623339 369653 360839 403051
Idx248 491.37 284008 616339 365309 357584 397646
Idx249 491.66 280389 608621 360524 354026 391787
Idx250 491.95 276427 600242 355318 350107 385566
Idx251 492.24 272065 591335 349852 345847 378995
Idx252 492.52 267319 581886 344093 341264 372162
Idx253 492.81 262184 571856 338032 336452 365009
Idx254 493.10 256704 561187 331571 331332 357603
Idx255 493.39 250948 550062 324833 325994 349989
Idx256 493.67 245004 538493 317868 320382 342160
Idx257 493.96 238861 526486 310720 314609 334113
Idx258 494.25 232582 514002 303390 308592 325724
Idx259 494.53 226201 500928 295800 302251 317065
Idx260 494.82 219682 487328 287878 295580 308181
Idx261 495.11 212965 473215 279552 288671 299070
Idx262 495.40 206067 458701 270825 281566 289663
Idx263 495.68 199003 443823 261678 274235 279898
Idx264 495.97 191816 428663 252017 266554 269716
Idx265 496.26 184475 413348 241995 258496 259179
Idx266 496.54 176997 397980 231642 250135 248228
Idx267 496.83 169401 382613 221109 241472 236970
Idx268 497.12 161702 367179 210445 232506 225363
Idx269 497.40 153963 351590 199673 223235 213440
Idx270 497.69 146171 335832 188864 213830 201136
Idx271 497.98 138363 319893 177970 204360 188609
Idx272 498.26 130336 303813 167021 194795 175967
Idx273 498.55 122086 287683 156070 185110 163240
Idx274 498.84 113614 271451 145265 175257 150435
Idx275 499.13 105045 255112 134529 165336 137509
Idx276 499.41 96432 238641 123769 155464 124522
Idx277 499.70 87755 222157 112988 145682 111506
Idx278 499.99 79088 205685 102214 135935 98564
Idx279 500.27 70403 189199 91494 126194 85578
Idx280 500.56 61602 172601 80776 116408 72456
Idx281 500.85 52610 155716 69985 106577 59277
Idx282 501.13 43480 138595 59097 96657 46093
Idx283 501.42 34197 121123 48117 86585 33081
Idx284 501.71 24745 103553 36953 76325 20197
Idx285 501.99 15163 85818 25641 65935 7449
Idx286 502.28 5557 68045 14143 55425 -5298
Idx287 502.57 -4015 50258 2520 44729 -18055
Idx288 502.85 -13599 32601 -9267 33876 -30785
Idx289 503.14 -23212 15069 -21038 22874 -43360
Idx290 503.42 -32919 -2412 -32805 11830 -55725
Idx291 503.71 -42543 -19771 -44483 727 -67757
Idx292 504.00 -52151 -37032 -56061 -10354 -79454
Idx293 504.28 -61669 -54024 -67504 -21384 -90863
Idx294 504.57 -71165 -70820 -78848 -32329 -102005
Idx295 504.86 -80615 -87397 -90129 -43227 -112923
Idx296 505.14 -90058 -103850 -101378 -54165 -123657
Idx297 505.43 -99442 -120178 -112584 -65082 -134344
Idx298 505.72 -108666 -136289 -123639 -75871 -145040
Idx299 506.00 -117685 -152113 -134538 -86407 -155659
Idx300 506.29 -126504 -167488 -145251 -96669 -166117
Idx301 506.57 -135151 -182492 -155657 -106733 -176407
Idx302 506.86 -143632 -197276 -165709 -116572 -186689
Idx303 507.15 -151927 -211801 -175483 -126256 -197051
Idx304 507.43 -160013 -225859 -185007 -135828 -207385
Idx305 507.72 -167869 -239561 -194352 -145280 -217605
Idx306 508.01 -175497 -252864 -203466 -154558 -227620
Idx307 508.29 -182923 -265843 -212254 -163557 -237342
Idx308 508.58 -190122 -278313 -220668 -172424 -246737
Idx309 508.86 -196976 -290358 -228707 -181131 -255751
Idx310 509.15 -203536 -301941 -236495 -189702 -264451
Idx311 509.44 -209857 -313051 -244082 -198043 -272807
Idx312 509.72 -216042 -323794 -251495 -206152 -280748
Idx313 510.01 -222048 -334297 -258633 -214003 -288230
Idx314 510.29 -227930 -344466 -265448 -221548 -295165
Idx315 510.58 -233718 -354310 -271918 -228816 -301665
Idx316 510.87 -239441 -363674 -278238 -235836 -307766
Idx317 511.15 -244982 -372594 -284411 -242584 -313573
Idx318 511.44 -250372 -381303 -290391 -249130 -319119
Idx319 511.72 -255499 -389911 -296184 -255592 -324484
Idx320 512.01 -260352 -398308 -301794 -261946 -329531
Idx321 512.30 -264850 -406367 -307159 -268024 -334269
Idx322 512.58 -269035 -414010 -312146 -273714 -338566
Idx323 512.87 -272923 -421483 -316772 -279027 -342582
Idx324 513.15 -276578 -428661 -321026 -284001 -346328
Idx325 513.44 -279942 -435544 -324830 -288673 -349794
Idx326 513.73 -282957 -441940 -328176 -293032 -353061
Idx327 514.01 -285566 -447592 -331176 -297188 -355968
Idx328 514.30 -287811 -452516 -334014 -300987 -358569
Idx329 514.58 -289588 -456849 -336622 -304352 -360796
Idx330 514.87 -291015 -460652 -338867 -307139 -362678
Showing 1 to 29 of 1,903 entries, 6 total columns
DF <- DF
Min <- min(DF$Wavelength)
Max <- max(DF$Wavelength)
fx.linear <- approxfun(DataSg$Wavelength,DataSg$Y_Cl_Egg14)
Fx.linear <- integrate(fx.linear, 565, 581)
DATA <- data.frame(method='linear', area=Fx.linear$value, error=Fx.linear$abs.error)
view(DATA)
预期结果 方法区域错误 1个线性-6589065 567.8747
但适用于所有列