contentment | A WebCore 2 content management system | Content Management System library

I have a list of dictionaries and five lists of words. I want to look if the words of the lists occur in the dictionaries. Therefore I used the the following code:

How many words contain some two-letter sequence repeated 3 times? For example, "contentment" and "maintaining" are such words because "contentment" has the sequence "nt" repeated three times and "maintaining" has the sequence "in" repeated three times.

This is my code:

I have a large dataframe consisting of tweets, and keyword dictionaries loaded as values that have words associated with morality (kw_Moral) and emotion (kw_Emo). In the past I have used the keyword dictionaries to subset a dataframe to get only the tweets that have one or more of the keywords present.

For example, to create a subset with only those tweets that have emotional keywords, I loaded in my keyword dictionary...

I am processing survey data. Some of the questions ask participants to check all of the options that apply to them. In the dataframe I currently have, there is a column for each of the possible responses, with a value of 1 recorded if the participant selected that option. For example, for the question "Which of the following emotions have you experienced at work?", with the options "Boredom", "Stress", "Contentment", my dataframe would look like this:

I have a large dataframe consisting of tweets, and a keyword dictionary loaded as a list that has words and word stems associated with emotion (kw_Emo). I need to find a way to count how many times any given word/word stem from kw_Emo is present each tweet. In kw_Emo, word stems are marked with an asterisk ( * ). For example, one word stem is ador*, meaning that I need to account for the presence of adorable, adore, adoring, or any pattern of letters that starts with ador….

From a previous Stack Overflow discussion (see previous question on my profile), I was greatly helped with the following solution, but it only counts exact character matches (Ex. only ador, not adorable):

1. Load relevant package.

   library(stringr)

2. Identify and remove the * from word stems in kw_Emo.

   for (x in 1:length(kw_Emo)) { if (grepl("[*]", kw_Emo[x]) == TRUE) { kw_Emo[x] <- substr(kw_Emo[x],1,nchar(kw_Emo[x])-1) } }

3. Create new columns, one for each word/word stem from kw_Emo, with default value 0.

   for (x in 1:length(keywords)) { dataframe[, keywords[x]] <- 0}

4. Split each Tweet to a vector of words, see if the keyword is equal to any, add +1 to the appropriate word/word stems' column.

   for (x in 1:nrow(dataframe)) { partials <- data.frame(str_split(dataframe[x,2], " "), stringsAsFactors=FALSE) partials <- partials[partials[] != ""] for(y in 1:length(partials)) { for (z in 1:length(keywords)) { if (keywords[z] == partials[y]) { dataframe[x, keywords[z]] <- dataframe[x, keywords[z]] + 1 } } } }

Is there a way to alter this solution to account for word stems? I'm wondering if it's possible to first use a stringr pattern to replace occurrences of a word stem with the exact characters, and then use this exact match solution. For instance, something like stringr::str_replace_all(x, "ador[a-z]+", "ador"). But I'm unsure how to do this with my large dictionary and numerous word stems. Maybe the loop removing [*], which essentially identifies all word stems, can be adapted somehow?

Here is a reproducible sample of my dataframe, called TestTweets with the text to be analysed in a column called clean_text:

dput(droplevels(head(TestTweets, 20)))

I want to update my table contentment, which has the following attributes:

employeeid, questionid, date, score, comment

The words in bold are the primary key of this table. My stored procedure needs to update a questionid for a employeeid. Only the questionid needs to be changed. The employeeid, date, score and comment need to stay the same.

I have the following:

I have this trigger:

I want to make a trigger that checks if the employee has not more than 10 questionid's in a week(in the contentment table). The employee may not answer more than 10 questions in a week(7 days). Is this possible?

Contentmenttable: employeeid, questionid, date, score

I'm struggling how to get a weekly function.

Create table script contentment:

The varchar value of my stored procedure can contain 200 characters. When there are more than 200 characters, I want a raiserror and a rollback of the transaction. How to do this? I use SQL Server

I'm having this: