2016-04-26 2 views

答えて

0

私は再びみます:

のは、あなたが持っているものの線に沿って行列を作成してみましょう:

new <- matrix(data = NA, nrow = 2, ncol = 2) 
new[1,] <- c("Tue", "Wed") 
new[2,] <- c(1, 2) 

今の私たちが持っている2つの行を組み合わせることによって、新しいベクトルを作成してみましょう:

newer <- paste0(new[1,], new[2,]) 

今、私たちはそれをバインドすることができますマトリックスの最下部まで:

new <- rbind(new, newer) 

これは必要なのですか?

+0

ありがとう!それはしました。 =) – OmegaSupreme

+0

あなたは大歓迎です:) – rosscova

1

私は日付の列を取り、「曜日」の列を返すように*「day.of.week」機能を使用して、ここで同じようなことを実現しました:

output$day <- ifelse(is.na(output$date), NA, 
          day.of.week(as.integer(substr(as.character(output$date), 6, 7)), 
             as.integer(substr(as.character(output$date), 9, 10)), 
             as.integer(substr(as.character(output$date), 1, 4)) 
          ) + 1L) 
day.values <- c("Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday") 
output$day <- day.values[ output$day ] 

注空またはNAフィールドの曜日を計算するのを避けるために、私はそれをifelseに入れました。

基本的には、chronの "day.of.week"関数(つまり、chronパッケージを実行していることを確認してください)は、日付ごとに1〜7の値を返します。 1-7の値を使って、 "day.values"というリストから "day"のテキスト値を抽出します。

  • "day.of.week" への入力が形式(年、月、日)である注2016年4月26日のためのすなわち:

    day.of.week(2016, 04, 26) 
    

    私のコードは、日付の入力を取っています"日" の形式で、つまりそれは次のようになります。

    2016-04-26 
    
+0

あなたの質問をもう一度読んだだけで、私があなたが求めていたことに答えたかもしれませんが、実際はまったく異なるものでした。申し訳ありませんが、その場合は、私は混乱した:P – rosscova

+0

それはクールです。私の質問はちょっと混乱していました(私の電話で自動修正-_-)。しかし、私はすでにあなたが新しいコラムを作ったと言うことができます。しかし、あなたは私に夢中になるアイデアをくれました。ありがとうございました。 – OmegaSupreme

関連する問題