Separate fields in R when no delimiter exists -

-

i have dataset following:

structure(list(info = c("acacia melanoceras 0.0369 0.0427 0.0267 0.0298 0.0501 0.0042 ",  "acalypha diversifolia van 0.0670 0.0439 0.0281 0.0427 0.0464 -0.0148 ",  "acalypha macrostachya vin 0.0657 0.0621 0.0441 0.0522 0.0473 -0.0173 ",  "adelia triloba 0.0481 0.0350 0.0202 0.0174 0.0286 -0.0349 ",  "aegiphila panamensis 0.0437 0.0312 0.0166 0.0148 0.0194 -0.0497 ",  "alchornea costaricensis 0.0568 0.0781 0.0502 0.0221 0.0734 -0.0153 " )), .names = "info", row.names = c(na, 6l), class = "data.frame")

it has 1 column , looks this

                                                                   info 1         acacia melanoceras 0.0369 0.0427 0.0267 0.0298 0.0501 0.0042  2 acalypha diversifolia van 0.0670 0.0439 0.0281 0.0427 0.0464 -0.0148  3 acalypha macrostachya vin 0.0657 0.0621 0.0441 0.0522 0.0473 -0.0173  4            adelia triloba 0.0481 0.0350 0.0202 0.0174 0.0286 -0.0349  5      aegiphila panamensis 0.0437 0.0312 0.0166 0.0148 0.0194 -0.0497  6   alchornea costaricensis 0.0568 0.0781 0.0502 0.0221 0.0734 -0.0153

i have 7 columns , this:

           species             v1     v2      v3     v4    v5     v6 1         acacia melanoceras 0.0369 0.0427 0.0267 0.0298 0.0501 0.0042  2 acalypha diversifolia van 0.0670 0.0439 0.0281 0.0427 0.0464 -0.0148  3 acalypha macrostachya vin 0.0657 0.0621 0.0441 0.0522 0.0473 -0.0173  4            adelia triloba 0.0481 0.0350 0.0202 0.0174 0.0286 -0.0349  5      aegiphila panamensis 0.0437 0.0312 0.0166 0.0148 0.0194 -0.0497  6   alchornea costaricensis 0.0568 0.0781 0.0502 0.0221 0.0734 -0.0153

this probelm has been giving me headaches species name not 2 words. original text file not delimited, have been unable read in delimited. have been able in 1 column strings. have suggestions?

try using gsub putting comma before every number in "info" column of dataframe assume named "dat" , re-read read.csv:

> read.csv(text=gsub("( [-[:digit:].])", ",\\1", dat$info), header=false)                          v1     v2     v3     v4     v5     v6      v7 1        acacia melanoceras 0.0369 0.0427 0.0267 0.0298 0.0501  0.0042 2 acalypha diversifolia van 0.0670 0.0439 0.0281 0.0427 0.0464 -0.0148 3 acalypha macrostachya vin 0.0657 0.0621 0.0441 0.0522 0.0473 -0.0173 4            adelia triloba 0.0481 0.0350 0.0202 0.0174 0.0286 -0.0349 5      aegiphila panamensis 0.0437 0.0312 0.0166 0.0148 0.0194 -0.0497 6   alchornea costaricensis 0.0568 0.0781 0.0502 0.0221 0.0734 -0.0153

i thank describing use case. might able use myself in future.


Comments

Post a Comment

Popular posts from this blog

c++ - OpenCV Error: Assertion failed <scn == 3 ::scn == 4> in unknown function, -

-
i read alot other solution still confused should mine... #include <opencv2/objdetect/objdetect.hpp> #include <opencv2/highgui/highgui.hpp> #include <opencv2/imgproc/imgproc.hpp> #include <iostream> #include <stdio.h> using namespace std; using namespace cv; int main(int argc, const char** argv) { //create cascade classifier object used face detection cascadeclassifier face_cascade; //use haarcascade_frontalface_alt.xml library face_cascade.load("haarcascade_frontalface_alt.xml"); //setup video capture device , link first capture device videocapture capturedevice; capturedevice.open(0); //setup image files used in capture process mat captureframe; mat grayscaleframe; //create window present results namedwindow("outputcapture", 1); //create loop capture , find faces while (true) { //capture new image frame capturedevice >> captureframe; ...
Read more

php - render data via PDO::FETCH_FUNC vs loop -

-
i've been using 2 methods render data. the first one: function name($id,$name){ return '<div id="'.$id.'">'.$name.'</div>'; } echo implode($pdo->query("select id,name user")->fetchall(pdo::fetch_func,'name')); the second one: $users = $pdo->query("select id,name user")->fetchall(pdo::fetch_obj); foreach($users $user){ echo name($user->id,$user->name); } i don't understand how pdo::fetch_func works. tried figure out. however, not well-documented. could please explain fetch mode? , also, 1 performs better? thank you. both methods wrong , have learn how use templates , how separate business logic presentation logic. $users = $pdo->query("select id,name user")->fetchall(pdo::fetch_obj); tpl::assign('users', $users); is code business logic part. then in template <?php foreach $users $row): ?> <div id="<?=$...
Read more

The canvas has been tainted by cross-origin data in chrome only -

-
uncaught securityerror: failed execute 'getimagedata' on 'canvasrenderingcontext2d': canvas has been tainted cross-origin data i getting above error in chrome. code(following) works fine in mozilla. have not corss domain issue. why above error in chrome? var wheel_canvas, wheel_context, can_w, can_h, wheel_grd; var large_radius = 160; var small_radius = 120; var wheel_canvas = document.getelementbyid('wheel_canvas'); var wheel_context = wheel_canvas.getcontext('2d'); var can_w = $(wheel_canvas).width(); var can_h = $(wheel_canvas).height(); var centerx = can_w / 2, centery = can_h / 2; var wheel_grd = null; test('#ff0000'); function test(hex) { $('#clrpicker').css({'left': 210, 'top': 210 }); inverted = hexbw(hex); $('#color_val_show').val(hex); current_color_hex_val_selected = hex; $('#color_val_show').css({'color':inverted,'background':hex}); fillgradient...
Read more