user: Question: When Arthur Heinemann is the writer who is the director?
Columns: ['No. in series', 'Title', 'Directed By', 'Written By', 'air date', 'Production code']
Types: ['text', 'text', 'text', 'text', 'text', 'text']
Sample row: ['1', '"A Harvest of Friends"', 'Michael Landon', 'Blanche Hanalis , John Hawkins & William Putman', 'September 11, 1974', '1002']
SQL:

assistant: SELECT "Directed By" FROM "Table" WHERE "Written By" = 'Arthur Heinemann';