logo
Tags down

shadow

Extracting all words and clusters of letters in a string and then making each word a seperate piece of data using gsub()


By : Smef
Date : August 02 2020, 01:00 AM
hop of those help? Say we have: , You can use strsplit:
code :
result <- unlist(strsplit(stringTest, " |\\d"))
result[result != ""]
#> [1] "Here"     "we"       "have"     "words"    "Here"     "we"      
#> [7] "have"     "avwerfaf"
unlist(lapply(strsplit(stringTest, "\\W|\\d"), function(x) x[x != ""]))


Share : facebook icon twitter icon

How to reverse words in a string and letters in those words unless the word is a number


By : JakeElwood
Date : March 29 2020, 07:55 AM
this one helps. Hello & it's nice to be with you all. I was successful in reversing arrays using the built-in functions .split('').reverse().join('') presented in this site, but I need to keep digits in order, not reversed. Is there anything to do or to add to let it exclude the digits from being reversed, or to re-reverse the digits only after reversing the full array? Here's the array flipping function,
code :
"hello 123.45".split(/([^\d\.])/).reverse().join('')

Extracting capital words and extracting the last word in a string


By : George Mills
Date : March 29 2020, 07:55 AM
seems to work fine I have a df that looks like this:
code :
df <- within(df, st_name <- sub(".*?([A-Z]{3,}).*", "\\1", x, perl=TRUE))

df <- within(df, st_type <- sub(".+? ([A-Z]+)$", "\\1", x, perl=TRUE))
#                         x           y    st_name st_type
#1     800 Block of MAIN ST  1.92908789       MAIN      ST
#2 100 Block of CHESTNUT AV  0.02487045   CHESTNUT      AV
#3   BAY ST / WELLINGTON ST -2.33411242        BAY      ST
#4     LARKIN ST / ELLIS ST -1.17946144     LARKIN      ST
#5 MAPLE ST / WELLINGTON ST  0.12913797      MAPLE      ST
#6  MEANDERING RD / MAIN ST -0.94150930 MEANDERING      ST
df$st_name <- sub(".*?([A-Z]{3,}).*", "\\1", df$x, perl=TRUE)
df$st_type <- sub(".+? ([A-Z]+)$", "\\1", df$x, perl=TRUE)

R : Remove words with 3 or more repeating letters using GSUB


By : bart schoonaert
Date : March 29 2020, 07:55 AM
I hope this helps you . A quick search brought up this SO answer. Using that you can do something like:
code :
## string with repeated letters
s <- "It has been raining verrrry badly heeere last few days"

## split string into vector of words to select
svec <- unlist(strsplit(s, " "))

## find words with 3 or more repeated letters/numbers
## (for any general symbol use '.' instead of '\\w')
rmword <- grep("(\\w)\\1{2, }", svec)

## join words into single string again, removing the unwanted ones
paste(svec[-rmword], collapse = " ")

## output:
[1] "It has been raining badly last few days"
rm.repeatLetters <- function(x){
  xvec <- unlist(strsplit(x, " "))
  rmword <- grepl("(\\w)\\1{2, }", xvec)
  return(paste(xvec[!rmword], collapse = " "))
}
df <- data.frame(id=c(1, 2, 3), text=c(s, s, s), stringsAsFactors=FALSE)
## > df
##   id                                                   text
## 1  1 It has been raining verrrry badly heeere last few days
## 2  2 It has been raining verrrry badly heeere last few days
## 3  3 It has been raining verrrry badly heeere last few days


df$text <- sapply(df$text, rm.repeatLetters)
## > df
##   id                                    text
## 1  1 It has been raining badly last few days
## 2  2 It has been raining badly last few days
## 3  3 It has been raining badly last few days

How to add letters / words / characters to a special word in a string in javascript?


By : user3436741
Date : March 29 2020, 07:55 AM
Does that help Find substring in Javascript and prepend/append some characters
StackOverflow to the rescue!
code :
function addify( str, ending ){
  return str.replace(/@(\w+)/g, `@$1${ending}`);
}

console.log( addify( 'i like @cheese', 'burgers' ) );
console.log( addify( 'party @ my place', 'not!' ) );

Extracting first word from a string that has more than three letters


By : Nandini
Date : March 29 2020, 07:55 AM
Hope this helps so I have a string: , Try this easy solution:
code :
string<-"I am a dentist in a health organization."
words<-unlist(strsplit(string," "))
words[which.max(nchar(words)>3)]
[1] "dentist"
df<-data.frame(string=c("I am a dentist in a health organization.","a dentist in a health organization.","health organization."))

f<-function(string,n)
{
  words<-unlist(strsplit(string," "))
  return(words[which.max(nchar(words)>n)])

}

df$word<-unlist(lapply(as.character(df$string),f,n=3))

df
                                    string    word
1 I am a dentist in a health organization. dentist
2      a dentist in a health organization. dentist
3                     health organization.  health
Related Posts Related Posts :
  • Cannot install httr package in R 3.6.2 in Linux Mint 19.3
  • I am unable to create this variable
  • How can I wrap lines of code into an function that I can run with one command in R?
  • Code for converting entire data frame to numeric
  • Using which and ! functions in R
  • How to replace NAs with values from another column in data.table (Example given)?
  • Visualising two very different distributions in one plot
  • R: a tidy way to count number of rows between pipes?
  • Collapsing rows using two vectors as indicators
  • I am trying to calculate the sum of distances between every uninfected point and an infected point
  • R lubridate: Apply helper to dataframe
  • Why does Dplyr group_by not respect .drop=FALSE
  • Is there a function in R that can convert a "time" factor (00:00:00) into seconds
  • Partial functions keeping their signature
  • Completing or inserting empty rows in-between ordered factors
  • How to sum up the duplicated value and keep all the rows on R
  • Filtering for two identical consecutive entries in a column
  • why colour not showing as argument in ggplot for R language
  • Clustering using daisy and pam in R
  • string abbreviation creating dublicates
  • Create a new matrix based on a previous one in R
  • Continuous X variable used but still getting Error: StatBin requires a continuous x variable
  • Classic Statistics Probability in R Draws
  • Removing String from the column in R
  • How to add columns to a dataframe through lapply
  • Error in match.arg(regions) : 'arg' must be NULL or a character vector
  • Substitution Encryption/Decryption in R
  • Calculate average based on date range in R
  • How to select among 3 values, the 2 closest to each other in R?
  • Generate random weights vector with fixed sum
  • glmnet: extracting standardized coefficients
  • Colour stacked bar-chart with unique colour for each bar in ggplot
  • Is there a better way in R to split a file with multiple sections
  • How to remove footnote references from a column in R?
  • Is there something wrong with the sjPlot package?
  • efficient way of selecting rows with a minimum time spacing between dates while grouping
  • maximizing function using optim in r where one of the parameters is an integer
  • How to iterate multiple data frames in R?
  • How do I select column based on value in another column with dplyr?
  • Why i cant use "i" value of for loops in ggplot graphs?
  • How to replace blanks (“”) in certain columns (specifically, “NAICSP” and “SOCP”) with NA values
  • How do I plot a graph in R, with the first values in one colour and the next values in another colour?
  • how to compare a vector of length 1 with a vector of length greater than 1?
  • How to remove all columns that contain more than 2000 NA values?
  • How to modify shared objects using foreach loop in R?
  • R making dataset
  • How open PDF file in the same window as R Shiny application works?
  • how to fit multiple ggplot charts on a a4 pdf?
  • How do i create a 3d surface plot in R If I have a dataframe of 3 columns?
  • How to find out the different data types for sparse matrices in R
  • Convert (format) clock time from H:MM to HH:MM
  • R-Lookup matching values in another dataframe and then merge them in original by creating new variables
  • Data Table Solution in R To Trim
  • Fill Missing Values
  • Sum of variables in a grouped barplot in ggplot2
  • Correlation Matrix Between Two Dataframes in R
  • Matlab function uint8 in R
  • Interpolate year-month-day from year, month, and week data in R
  • Why can I not use the output of my function to get an output for my other defined function in R?
  • Can ggplot titles contain line breaks (when used with ggtext)?
  • shadow
    Privacy Policy - Terms - Contact Us © voile276.org