ggplot2を使って関数に引数を渡してラインプロットを得るには？

Question

時系列プロット（折れ線グラフ）を作成する関数を記述しようとしています。プロットが作成されるように関数に引数を渡すにはどうすればよいですか？私はaes_stringなどを使用するような異なる方法を試しましたが、成功しませんでした。

lineplotfun <- function(feature){ 
    ggplot(aes(x = 1:length(feature), y = feature), data = mtcars) + 
    geom_line() 
    } 

lineplotfun(mpg) 

文字列または名前としてmpgを渡します。

Answer 1

問題のコードには多くの問題があります。 data = mtcarsと

1）yggplot2がロードされている場合mpgはtibble

3）aes()

2ではない）y = feature

4無意味である）1：長さ（機能）のみfeatureがベクターの場合は意味があります

あなたが望むものを達成する方法の1つは、 data = NULLを設定し、関数にベクトルを渡します

lineplotfun <- function(feature){ 
    require(ggplot2) 
    ggplot2::ggplot(data = NULL, aes(x = seq_along(feature), y = feature)) + 
    ggplot2::geom_line() 
} 

lineplotfun(mtcars$mpg) 

結果は次のとおりです。