CSV形式で1行ずつ保存できない。（形態素解析）

Question

前提・実現したいこと

複数行あるcsvファイルに対し、下記コードの処理を行った上で別ディレクトリに保存をしようとしているのですが、結果が1列にまとまって保存されてしまいます。
行毎に処理をして保存したいのですがうまくいきません。

csvファイルの中身
input
・数字、文字を含んだ文字列（数行あります。）
1行目：誕生日は1月1日です。
2行目：今日は11月11日です。

outputのイメージ
・行ごとに処理された結果が保存されている。
1行目：inputのcsvファイルの1行目の処理結果
2行目：inputのcsvファイルの2行目の処理結果

ここに質問の内容を詳しく書いてください。
（例）PHP(CakePHP)で●●なシステムを作っています。
■■な機能を実装中に以下のエラーメッセージが発生しました。

発生している問題・エラーメッセージ

1行ずつ処理して保存したつもりが、1列に処理結果がまとまってしまう。

該当のソースコード

from pathlib import Path
from janome.charfilter import *
from janome.analyzer import Analyzer
from janome.tokenizer import Tokenizer
from janome.tokenfilter import *
from gensim import corpora
import glob
import csv
import os

#入力ディレクトリ、出力ディレクトリ
data_dir_path = Path('./1.input')
wordlist_dir_path=Path('./2.wordlist')
cutlist_dir_path=Path('./3.cutlist')
corpus_dir_path = Path('./4.output')

#ファイルの読み込み
file_name = "./ファイル名.csv"
#ファイルを開く
with open(data_dir_path.joinpath(file_name), 'r', encoding='cp932') as file:
    texts = file.readlines()

# janomeのAnalyzer：文の分割と単語の正規化
# 文に対する処理のまとめ
    char_filters = [UnicodeNormalizeCharFilter(),         # UnicodeをNFKC(デフォルト)で正規化
                RegexReplaceCharFilter('(', ''),     # (を削除
                RegexReplaceCharFilter(')', '')      # )を削除
                ]

# 単語に分割
    tokenizer = Tokenizer()

# 名詞中の数(漢数字を含む)を全て0に置き換えるTokenFilterの実装
#
    class NumericReplaceFilter(TokenFilter):
        def apply(self, tokens):
            for token in tokens:
                parts = token.part_of_speech.split(',')
                if (parts[0] == '名詞' and parts[1] == '数'):
                    token.surface = '0'
                    token.base_form = '0'
                    token.reading = 'ゼロ'
                    token.phonetic = 'ゼロ'
                yield token

#  ひらがな・カタガナ・英数字の一文字しか無い単語は削除
    class OneCharacterReplaceFilter(TokenFilter):
        def apply(self, tokens):
            for token in tokens:
                # 上記のルールの一文字制限で引っかかった場合、その単語を無視
                if re.match('^[あ-んア-ンa-zA-Z0-9ー]$', token.surface):
                     continue
                yield token


# 単語に対する処理のまとめ
    token_filters = [NumericReplaceFilter(),                            # 名詞中の漢数字を含む数字を0に置換
                     CompoundNounFilter(),                              # 名詞が連続する場合は複合名詞にする
                     POSKeepFilter(['名詞', '動詞', '形容詞', '副詞']), # 名詞・動詞・形容詞・副詞のみを取得する
#                     POSKeepFilter(['名詞']),                           # 名詞のみを取得する
                     LowerCaseFilter(),                                 # 英字は小文字にする
                     OneCharacterReplaceFilter()                        # 一文字しか無いひらがなとカタガナと英数字は削除
                     ]

    analyzer = Analyzer(char_filters, tokenizer, token_filters)

    tokens_list = []
    raw_texts = []
    for text in texts:
        # 文を分割し、単語をそれぞれ正規化する
        text_ = [token.base_form for token in analyzer.analyze(text)]
        if len(text_) > 0:
            tokens_list.append([token.base_form for token in analyzer.analyze(text)])
            raw_texts.append(text)

# 正規化された際に一文字もない文の削除後の元テキストデータ
    raw_texts = [text_+'\n' for text_ in raw_texts]
    with open(cutlist_dir_path.joinpath(file_name.replace('.csv', '_cut.csv')), 'w', encoding='cp932',newline="") as file:
        file.writelines(raw_texts)

# 単語リストの作成
    words = []
    for text in tokens_list:
        words.extend([word+'\n' for word in text if word != ''])
    with open(wordlist_dir_path.joinpath(file_name.replace('.csv', '_word_list.csv')), 'w', encoding='cp932',newline="") as file:
        file.writelines(words)

# 単語リストからストップワードを削除
## ストップワードファイルからの呼び込み
    stop_words = []
    path = 'stopwords_jp.txt'
    with open(path) as f:
        stop_words = f.readlines()

## ストップワードの除外
    changed_words = [word for word in words if word not in stop_words]
    print('-----------------')
    print('Delited ' + str(len(words) - len(changed_words)) + ' words' )
    print('-----------------')

    with open(corpus_dir_path.joinpath(file_name.replace('.csv', '_word_list_exclude.csv')), 'w', encoding='cp932') as file:
        file.writelines(changed_words)

試したこと

ここに問題に対して試したことを記載してください。

補足情報（FW/ツールのバージョンなど）

Answer 1

writelinesは改行しません。
forループとwrite()で出力しましょう。