[解決済み] このエラーを解決するには: 'rownames'をディメンションのないオブジェクトに設定しようとする
2022-02-07 04:13:32
質問
毎日の流量が記載されたcsvファイルを持っています。日次の値を月次に結合する必要があります。ハイドロTSMパッケージの"daily2monthly"関数を使おうとしているのですが、どうすればよいでしょうか? BRPT2.csvのサンプルデータです。
_date,_time,_value,_flag
10/2/1959,0:00:00,0,2
10/3/1959,0:00:00,0,2
10/4/1959,0:00:00,1540,2
10/5/1959,0:00:00,16100,2
10/6/1959,0:00:00,6680,2
10/7/1959,0:00:00,3100,2
10/8/1959,0:00:00,2060,2
以下のコマンドを使いました。
qme<- read.csv(file = "BRPT2.csv",header = T,sep = ",") #read in csv file
date<- as.Date(qme$X_date,format("%Y-%m-%d")) #convert date column to date format from factor
flow<- qme[,3]
flow_2<-replace(flow,flow==-999,0) #replace the missing values (-999) with 0
df<- data.frame()
df<- rbind(df,data.frame(date,flow_2,stringsAsFactors = FALSE))
daily2monthly(df,FUN=sum,dates=1)
そして、次のようなエラーメッセージが表示されます。
のエラー
rownames<-
(*tmp*
, value = c("Oct-1959", "Nov-1959", "Dec-1959", : オブジェクトに 'rownames' を設定しようとした。 寸法
この件に関して、どなたか助けていただけないでしょうか。事前にありがとうございます。
解決方法は?
を変換してください。
df
を
zoo
オブジェクトを先に作成します。
z <- zoo(df[, -1], df[, 1])
daily2monthly(z, FUN=sum, dates=1)
# 1959-10-01 1959-11-01 1959-12-01 1960-01-01 1960-02-01 1960-03-01 1960-04-01
# 31440.0 411.9 1199.3 4373.0 1466.0 1904.0 741.0
は
data.frame
メソッドで
daily2monthly
は、複数の列のデータがある場合にのみ動作します。あなたの場合、データは1つしかないので、この関数はエラーメッセージを返します。 例えば、もう1列のデータがあったとしましょう。
df$station_3 <- sample(1:1000, nrow(df))
daily2monthly(df, FUN=sum, dates=1)
# flow_2 station_3
# Oct-1959 31440.0 132423
# Nov-1959 411.9 149305
# Dec-1959 1199.3 157622
# Jan-1960 4373.0 176413
# Feb-1960 1466.0 143373
# Mar-1960 1904.0 166102
# Apr-1960 741.0 141861
関連
-
[解決済み】エラー:私のコードで予期しないシンボル/入力/文字列定数/数値定数/SPECIALが発生した
-
[解決済み】model.frame.defaultでのエラー:変数の長さが異なる
-
[解決済み】scale_color_manual()が動作しない件
-
[解決済み】Rで「パッケージ'FILE_PATH'のインストールで終了ステータスが0でなかった」。
-
[解決済み】LMEモデルのレベル0、ブロック1でのバックソルブにおける特異性
-
[解決済み】値を置き換えようとすると、"データフレームの添え字の割り当てで欠損値は許可されない"
-
[解決済み】R ggplot2 で scale_x_discrete を使用する。
-
[解決済み】R 置換する項目数が置換長の倍数でない/しかし結果は正しい
-
[解決済み】Rでデータフレームのサブセットをプロットする方法は?
-
[解決済み】Rで「中断されたプロミスの評価を再開する」という警告を回避する
最新
-
nginxです。[emerg] 0.0.0.0:80 への bind() に失敗しました (98: アドレスは既に使用中です)
-
htmlページでギリシャ文字を使うには
-
ピュアhtml+cssでの要素読み込み効果
-
純粋なhtml + cssで五輪を実現するサンプルコード
-
ナビゲーションバー・ドロップダウンメニューのHTML+CSSサンプルコード
-
タイピング効果を実現するピュアhtml+css
-
htmlの選択ボックスのプレースホルダー作成に関する質問
-
html css3 伸縮しない 画像表示効果
-
トップナビゲーションバーメニュー作成用HTML+CSS
-
html+css 実装 サイバーパンク風ボタン
おすすめ
-
[解決済み】数学関数への非数値引数
-
[解決済み】LMEモデルのレベル0、ブロック1でのバックソルブにおける特異性
-
[解決済み】lis[[i]]のエラー:1つ未満の要素を選択しようとした場合
-
[解決済み】エラー。Rの'break'の数が無効
-
[解決済み】bstTreeの予測値の混乱行列、エラー:'The data must contain some levels that overlap reference'.
-
[解決済み】r Error dim(X) must have a positive length?
-
[解決済み】二項演算子への非数値引数【非公開
-
[解決済み】Rでのデータ操作。'X'はアトミックでなければならない
-
[解決済み】.External.graphics Rでエラーが発生しました。
-
[解決済み】forループを実行すると「要因のレベルセットが異なる」というエラーが発生する