n行を削除して1行のスクリプトをスキップ

単にn行を削除し、1行をスキップして、ドキュメントの最後まで繰り返す基本的なVimスクリプトを作成したいと思います。特定の一致は気にせず、行を削除したいだけです。例えば; したがって3ddj、ドキュメント全体に対してコマンドを繰り返したいと思います。

Text I want to keep.   
Text I want to delete.  
Text I want to delete.  
Text I want to delete.  
Text I want to keep.  
Text I want to delete.  
Text I want to delete.  
Text I want to delete.  
Text I want to keep.  
Text I want to delete.  
Text I want to delete.  
Text I want to delete.   

だから…

Text I want to keep.  
Text I want to keep.  
Text I want to keep.  

ありがとうございました。

非常にシンプルなアプローチ：

1. 削除する最初の行に移動します。
2. マクロを記録します。 qa3ddjq
3. 高い数値で繰り返します：1000 @ a

ステップ3では、マクロが1000回、またはエラーが発生するまで繰り返されます。ファイルの終わり（したがって削除する行がない）を押すと、エラーが発生し、マクロの繰り返しがキャンセルされます。

を参照してください:help recording。

私にとって最も簡単な解決策は：

:%norm j3dd

あれは：

• %：すべての行
• norm：次のキーを通常モードと同じように実行します
• j3dd：行を下に移動してから3行を削除

したがって、最初の行から2行目に移動し、次の3行を削除します。Text I want to keep.2行目は2行目になります。1行下に移動し、3を削除します。すすぎ、繰り返します。

注：ファイル全体を処理したくない場合は、で置き換えることができます。%normたとえば5,$norm、5行目からファイルの最後まで処理します。

あなたはすでに利用可能ないくつかの素晴らしいソリューションを持っています。ここに別のものがあります：

:g/^/if line('.')%4!=1|:s/^/DELETE ME/|endif
:g/^DELETE ME/d

まず、すべての行:gに対してアクションを実行し^（（行の先頭）と照合）、すべての行番号に対しての結果を実行しlinenumber % 4ます。結果がと等しくない場合は、行の先頭に1追加DELETE MEし、次のコマンドで削除する行をマークします。

次のコマンドは、通常の（:g）コマンドであり、で始まるすべての行に一致しますDELETE ME。

最初の:gコマンドを使用して行をすぐに削除することはできません。これにより、結果のモジュロ計算が変更されるため、最初に行にマークを付け、2番目のステップでそれを削除する必要があります。

私はこれがviチャンネルであることを知っていますが、私にとってこれはsed問題です。

sed -ne 'p;n;n;n' <file >newfile

だからあなたはそれをvi解決策に絞ることができます：

:0
!Gsed -ne 'p;n;n;n'

別の方法（例のテキストのように、1行目から始めて2-4行目、6-8行目などを削除するとします）：

while line(".") < line("$")
    silent +1delete _ 3
endwhile

これをインタラクティブに実行したい場合は、「コマンドラインレジスタ」を利用できます。つまり、

:+1del 3<CR> その後 1000@:

別の方法：行を保持したい場合：1、4など。

awk '!((FNR-1)%3)'  file > newfile
      # awk: when a condition is given without action:
      #        prints the lines for which the condition returns 0.
      # FNR designates the line number in the current file.
      # a%3 : takes the modulus of a and 3. ( 0%3=0, 1%3=1, 2%3=2, 3%3=0, 4%3=1, etc.) 
      # This will be 0 for 3, 6, etc. 
      # But we want it to be 0 (true) for 1, 4, etc : so we substract 1 to NR

# to see that it keeps those lines:
seq 1 20 | awk '!((NR-1)%3)'
1
4
7
10
13
16
19

別の代替方法：必要な行が特定のパターンに一致することがわかっている場合：

# for exemple each line you want contains "some pattern":
fgrep "some pattern" file > newfile
# (or regular grep if you want "some pattern" to be interpreted as a regexp)