How to delete the columns of a dataframe that have only positive values?

I’m trying to edit a DataFrame, my objective is to keep the columns in which at least one value is <=0.

For example, using the code

using DataFrames

data = Dict("A"=>[1,7,2], 

df = DataFrame(data)

I get the following result


And I’m trying to transform it into the following DataFrame


There are some options to remove rows based on conditions, but I haven’t found any that does the same to columns.

Does anyone know how to do this in a simple way?

I have answered on StackOverflow here: