list - R removing long duplicates from a vector -

-

suppose have a vector looks this, \n indicates new line:

m # [1] aa\nbb\ncc\ndd # [2] aa\nbb\nee\ndd # [3] aa\nbb\nee\ndd # [4] aa\nbb\ncc\ndd # [5] aa\nbb\nff\ndd

i want remove duplicates left with

m # [1] aa\nbb\nff\ndd

any suggestions? much

the real data trying manipulate messy:

head(m) [1] "ft   motif           619..622\nft                   /note=gatc\nft                   /color=48 249 173\nft   motif           complement(619..622)\nft                   /note=gatc\nft                   /color=48 249 173\nft   motif           8662..8667\nft                   /note=ctgcag\nft                   /color=90 236 150\nft   motif           complement(8662..8667)\nft                   /note=ctgcag\nft                   /color=90 236 150\nft   motif           205..210\nft                   /note=accacc\nft                   /color=197 13 106\nft   motif           complement(205..210)\nft                   /note=accacc\nft                   /color=197 13 106\nft   motif           419..423\nft                   /note=cc(a|t)gg\nft                   /color=252 213 234\nft   motif           complement(419..423)\nft                   /note=cc(a|t)gg\nft                   /color=252 213 234\nft   motif           16843..16858\nft                   /note=ccac.{8}tga(c|t)\nft                   /color=132 205 77\nft   motif           complement(16843..16858)\nft                   /note=ccac.{8}tga(c|t)\nft                   /color=132 205 77"                     [2] "ft   motif           726..729\nft                   /note=gatc\nft                   /color=48 249 173\nft   motif           complement(726..729)\nft                   /note=gatc\nft                   /color=48 249 173\nft   motif           13022..13027\nft                   /note=ctgcag\nft                   /color=90 236 150\nft   motif           complement(13022..13027)\nft                   /note=ctgcag\nft                   /color=90 236 150\nft   motif           214..219\nft                   /note=accacc\nft                   /color=197 13 106\nft   motif           complement(214..219)\nft                   /note=accacc\nft                   /color=197 13 106\nft   motif           474..478\nft                   /note=cc(a|t)gg\nft                   /color=252 213 234\nft   motif           complement(474..478)\nft                   /note=cc(a|t)gg\nft                   /color=252 213 234\nft   motif           33075..33090\nft                   /note=ccac.{8}tga(c|t)\nft                   /color=132 205 77\nft   motif           complement(33075..33090)\nft                   /note=ccac.{8}tga(c|t)\nft                   /color=132 205 77"                 [3] "ft   motif           781..784\nft                   /note=gatc\nft                   /color=48 249 173\nft   motif           complement(781..784)\nft                   /note=gatc\nft                   /color=48 249 173\nft   motif           13132..13137\nft                   /note=ctgcag\nft                   /color=90 236 150\nft   motif           complement(13132..13137)\nft                   /note=ctgcag\nft                   /color=90 236 150\nft   motif           470..475\nft                   /note=accacc\nft                   /color=197 13 106\nft   motif           complement(470..475)\nft                   /note=accacc\nft                   /color=197 13 106\nft   motif           507..511\nft                   /note=cc(a|t)gg\nft                   /color=252 213 234\nft   motif           complement(507..511)\nft                   /note=cc(a|t)gg\nft                   /color=252 213 234\nft   motif           36423..36438\nft                   /note=ccac.{8}tga(c|t)\nft                   /color=132 205 77\nft   motif           complement(36423..36438)\nft                   /note=ccac.{8}tga(c|t)\nft                   /color=132 205 77"                 [4] "ft   motif           781..784\nft                   /note=gatc\nft                   /color=48 249 173\nft   motif           complement(781..784)\nft                   /note=gatc\nft                   /color=48 249 173\nft   motif           13132..13137\nft                   /note=ctgcag\nft                   /color=90 236 150\nft   motif           complement(13132..13137)\nft                   /note=ctgcag\nft                   /color=90 236 150\nft   motif           470..475\nft                   /note=accacc\nft                   /color=197 13 106\nft   motif           complement(470..475)\nft                   /note=accacc\nft                   /color=197 13 106\nft   motif           507..511\nft                   /note=cc(a|t)gg\nft                   /color=252 213 234\nft   motif           complement(507..511)\nft                   /note=cc(a|t)gg\nft                   /color=252 213 234\nft   motif           36423..36438\nft                   /note=ccac.{8}tga(c|t)\nft                   /color=132 205 77\nft   motif           complement(36423..36438)\nft                   /note=ccac.{8}tga(c|t)\nft                   /color=132 205 77"     [5] "ft   motif           1167..1170\nft                   /note=gatc\nft                   /color=48 249 173\nft   motif           complement(1167..1170)\nft                   /note=gatc\nft                   /color=48 249 173\nft   motif           16052..16057\nft                   /note=ctgcag\nft                   /color=90 236 150\nft   motif           complement(16052..16057)\nft                   /note=ctgcag\nft                   /color=90 236 150\nft   motif           14262..14267\nft                   /note=accacc\nft                   /color=197 13 106\nft   motif           complement(14262..14267)\nft                   /note=accacc\nft                   /color=197 13 106\nft   motif           1207..1211\nft                   /note=cc(a|t)gg\nft                   /color=252 213 234\nft   motif           complement(1207..1211)\nft                   /note=cc(a|t)gg\nft                   /color=252 213 234\nft   motif           44826..44841\nft                   /note=ccac.{8}tga(c|t)\nft                   /color=132 205 77\nft   motif           complement(44826..44841)\nft                   /note=ccac.{8}tga(c|t)\nft                   /color=132 205 77" [6] "ft   motif           1167..1170\nft                   /note=gatc\nft                   /color=48 249 173\nft   motif           complement(1167..1170)\nft                   /note=gatc\nft                   /color=48 249 173\nft   motif           16052..16057\nft                   /note=ctgcag\nft                   /color=90 236 150\nft   motif           complement(16052..16057)\nft                   /note=ctgcag\nft                   /color=90 236 150\nft   motif           14262..14267\nft                   /note=accacc\nft                   /color=197 13 106\nft   motif           complement(14262..14267)\nft                   /note=accacc\nft                   /color=197 13 106\nft   motif           1207..1211\nft                   /note=cc(a|t)gg\nft                   /color=252 213 234\nft   motif           complement(1207..1211)\nft                   /note=cc(a|t)gg\nft                   /color=252 213 234\nft   motif           44826..44841\nft                   /note=ccac.{8}tga(c|t)\nft                   /color=132 205 77\nft   motif           complement(44826..44841)\nft                   /note=ccac.{8}tga(c|t)\nft                   /color=132 205 77"

for example trying rid of lines 4 , 6, because exact duplicates of 3 , 5.

i think key function use duplicated. then

m[!m %in% m[duplicated(m)]]

will give elements not duplicated.


Comments

Post a Comment

Popular posts from this blog

qt - Using float or double for own QML classes -

-
i've created components , helper methods using c++ , qt used in qml gui. of methods calculate gui elements (size, transformations, scene graph items creation). target arm 32 bit using opengl / eglfs render output. opengl using float , qml using real (defined double ). what should use in c++ do not lose precision? if use qreal ( double ) shouldn't lose precision. if git grep float in qtbase.git , can find out bit more: dist/changes-5.2.0-**************************************************************************** dist/changes-5.2.0-* important behavior changes * dist/changes-5.2.0-**************************************************************************** dist/changes-5.2.0- dist/changes-5.2.0- - qt compiled qreal typedef'ed double on dist/changes-5.2.0: platforms. qreal float on arm chipsets before. guarantees more dist/changes-5.2.0- consistent behavior between platforms qt supports, binary dist/chan...
Read more

Create Outlook appointment via C# .Net -

-
i need create outlook appointment using microsoft.office.interop.outlook , while can work locally on own workstation , works if run web application via server's browser, not work when connect server externally. hence, think might permission issue. i changed application pool identity " localsystem " don't access denied error. unfortunately, doesn't work. the app behaves if appointment created, appointment doesn't appear in outlook. here include file on top of aspx.cs page using outlook = microsoft.office.interop.outlook; here code using pop appointment. outlook.application apptapp = new outlook.application(); outlook.appointmentitem appt = apptapp.createitem(outlook.olitemtype.olappointmentitem) outlook.appointmentitem; appt.subject = txtfirstname.text + " " + txtlastname.text; appt.body = txtcomment.text; appt.alldayevent = false; appt.start = datetime.parse(txtreminderdate.text + " 8:00 am"); appt.end = datetime.p...
Read more

ios - Swift Array Resetting Itself -

-
i have 2 arrays: pointhistory , datehistory . have nstimer , , when timer runs out, action called. in action appending int pointhistory , , current date string datehistory . here timer action: func timeraction() { let steppervalue = int(stepper.value) employee.numberofpoints = steppervalue networking.saveemployee(employee, completion: { (error) -> void in if error != nil { let alert = uialertcontroller(title: "error", message: "there error updating \(self.employee.name)'s points", preferredstyle: .alert) let alertaction = uialertaction(title: "ok", style: .cancel, handler: nil) alert.addaction(alertaction) self.presentviewcontroller(alert, animated: true, completion: nil) } }) var dateformatter = nsdateformatter() dateformatter.dateformat = "mm-dd-yyyy" dateformatter.timezone = nstimezone.localtimezone() var date = nsdate() var ...
Read more