在数据框中向列添加单引号

Question

我有一个df，其中多列有很多行。我想取一个列并在值周围添加单引号，然后添加逗号。

Column x
111111
222222
333333
444444

我希望它看起来像：

Column x
'111111',
'222222',
'333333',
'444444',

Answer 1

对于单引号，可以使用df1[,1] <- sQuote(df1[,1]) 。

sprintf

或者我们可以使用'随后包含,和df1[,1] <- sprintf("'%d',", df1[,1])

GetLastPhase.get({ 
         campaign_id: $stateParams.id,
         lead_id : id, 
         relations: 'lead,workflow,tickets'
     },
     function (response) {
         $scope.phaseDetails = response;
     });

Answer 2

如果你的专栏是Debug.Log (lastChar); GameObject toDestroy = msgSymbols[msgSymbols.Count - 1]; msgSymbols.RemoveAt(msgSymbols.Count - 1); Destroy(toDestroy); Debug.Log(msgSymbols.Count); ，你可以这样做：

df$x

Answer 3

您需要使用

df$x <- paste0("'", df$x, "'", ",")

这应该会给你想要的结果。

Answer 4

# data to build the df
Column x
a <- "111111"
b <- "222222"
c <- "333333"

# assemble the df
df <- data.frame(rbind(a,b,c))
names(df) <- "Column.X"

df$Column.X <- paste("'",df$Column.X,"',")