Select Modeled elements that have a dimension string attached to them in a view

I am attempting to write a script that will select all objects that, in a particular view, are not currently dimensioned.

Here is how to select modeled elements that have a dimension string attached to them in entire project, you better select only one view.

#Einar Raknes 2017
import clr

# Import List ( ICollection(ElementId) = List[ElementId]() )
clr.AddReference('System')
from System.Collections.Generic import List

# Import Revit API
clr.AddReference('RevitAPI')
from Autodesk.Revit.DB import *

# Import ToDSType(bool) extension method
clr.AddReference('RevitNodes')
import Revit
clr.ImportExtensions(Revit.GeometryConversion)
clr.ImportExtensions(Revit.Elements)

# Import DocumentManager and TransactionManager
clr.AddReference('RevitServices')
import RevitServices
from RevitServices.Persistence import DocumentManager
from RevitServices.Transactions import TransactionManager

doc = DocumentManager.Instance.CurrentDBDocument
uidoc = DocumentManager.Instance.CurrentUIApplication.ActiveUIDocument

# Input
dimensions = UnwrapElement(IN[0])
ids = set()
for dim in dimensions:
	for ref in dim.References:
		ids.add(ref.ElementId)

OUT = [doc.GetElement(id) for id in ids]